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aai 

am 
aas 
a«a 
445 

446 

447 

448 

449 

450 

451 

452 

453 

454 

455 

45b 

457 

458 

459 

460 

461 

462 
1 463 
S 464 

465 000000 

466 000000 004520 

467 000002 9100000 

468 000004 004520 

469 000006 

470 000010 

471 000012 

472 000014 

473 000016 

474 000020 

475 000022 

476 000024 

477 000026 

478 000030 

479 000032 

480 00003a 
431 000036 
462 000040 
483 000042 
484 
465 
466 
487 
488 
489 
490 
491 
492 
493 
49a 



704520 
000100 
004520 
000140 
004626 
000340 
002646 
000340 
002222 
000340 
004520 
0003a0 
000042 
000000 



177776 

001200 
000000 
1 00000 
100000 



14j5b page i? 



.TITLE nZDLBB 

.ENABLE A8S#AMA 
ITHJS TEST CHECKS THE DLU«E USING MODEMS 
IREFER ALSO TO TEST DZDLA (HL11-E OFF LINE TESTS) 
ISTARTING PROCEEDURE 
» LOAD ADDRESS 200 
I 

I STACK POINTER IS AT 1200 
I PRESS START 

I 

IAVAILABLE PROGRAMS 

I PRG0* SINGLE CHARACTER LINE MODE DATA TEST. 

I PRG1- SPECIAL BINARY COUNT LINE MODE DATA TEST. 
I PRG2« SPECIAL MESSAGE XMIT ONLY W/W/O PARITY 
I PRG3* RECEIVE DATA TEST 

I PRG4« SPIRAL PATTERN MESSAGE XMIT ONLY W/W/O PARITY 
I PRG5* DATA ECHO TEST (USES FACILITY AT MAYNARD) 

ISTANDARD SR SWITCH OPTIONS (SWITCH SET TO A 1 ) 

ISRIS- HALT ON ERROR. 

ISR14- SCOPE (NOT USED) 

J8R13« INHIBIT PRINTOUT 

ISR12« INHIBIT TRACE (NOT USED) 

>8R11« INHIBIT ITERATION (NOT USED) 

.80 

ERTP 9UNA38XGNED TRAP 



MACHERI ERTP 
40 

ERTP 
100 
ERTP 
140 

MAPVEC 
PRTY7 
PPAXL 
PRTY7 
EMTINT 
PRTY7 
ERTP 
340 
.+2 
HALT 
.REPT 
«*2 
4 
B ENDR 



119, 



IEQUATE STATEMENTS 
P8WBJ77776 
8TKPTRS1208 
OPENB0 

MANUALBBIT13 
SITI5B100000 



JSP OVERFLOW, BUS ERROR TRAP 

PRESERVED INSTRUCTION TRAP 

ITRACE TRAP 

JTRAP TO MAP VECTOR 

fPOWER FAIL TRAP 

IEMT TRAP 



ITRAP TO MAP MAKER 
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495 
496 
497 
498 
499 
500 
501 
502 
503 
504 
505 
506 
507 
508 
509 
510 
511 
512 
513 
514 
515 
516 
517 
518 
519 
520 
521 
522 
523 
524 
525 
526 
527 
528 
529 
530 
531 
532 
533 
s534 
^35 
536 
537 
538 
339 
540 
541 
342 
343 
544 
545 
546 
547 
548 



040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
005726 
022626 
000340 
000300 
000240 
000200 
000140 
000100 
000040 



104000 
104001 
104002 
104003 
104004 
104005 
104006 
104007 
104010 
104011 
104012 
104013 
104014 
104015 
104016 



JPOP THE STACK, SAME AS TST (6?« 

>POP STACK TWICE. SAME A8 CMP (6)*,(b)«* 

JPRIORITY LEVEL DEFINITIONS 



BIT14bA0®30 

B!T1SbS0B00 

BIYlIsl08efl 

BIT11B4000 

BIT10B2000 

BIT9S1000 

BIT8B400 

BIT?Bi00 

BIT6B100 

BITSsflB 

BIT4BS0 

BIT3B1S 

8XT2S4 

BITlBg 

BITBsi 

POP8R»S7I6 

POP3P2B0&2»a6 

PRTY7B348 

PRTV6»300 

PRTYSb840 

PRTY4b8§8 

PRTYSbUB 

PRTY1B100 

PRTT1"«8 

PRTY8B0 

TYPEfEMTtB 

TYPESbEMT** 

STAU"EMT*8 

ERR0RbEMT*3 

DATQHKiEMT** 

CHALT»EMT*t 

3TRXV*eMT+6 

STTXV»EMT*7 

EHALTbEMT*10 

8AVRC8«EMT*U 

R8TRgOBgMT+i6 

ERR0R1«EMT*13 

errtx«bm;t*i4 

ERRRK-sEMT^IS 
DELAYBEMT*16 
Nb0 

Asfl 



.MACR CNVOA SRCOSTjCOUNT 

J8R %3,0A0&V >80 TO OCTAL TO ASCII CONVERT. 

8RC JSOURCB 1 AODR. 

D8T ^DESTINATION AODR. 

COUNT j#OF DIBITS TO CONVERT. 

.ENDM 



RISR'N 9 ! 



.MACR 
JMP 



I8R 

MOV 
RISR 



N 



ISO TO COMMON INTERRUPT SERVICE ROUTINE 



DZDLBB 


HaCYii 


27{fe$7J 


|7«Nf5V» 


7^ laiS 


10 PAGE 


10 




DZDLBB, 


s®c 














509 












.EKJDM 




550 
















551 












»MAC& 


ISRT N 


552 










?I8R*N S 


: 


MOV #'N',' 


553 












JMP 


TISR 


55a 
















555 












a gW0M 




556 
















557 












.MACR 


RRCV N,A 


558 












175610*N 


559 












e EN0M 




560 
















56i 












.MACS 


RBUPP N,A 


562 












175612*N 


563 

56a 

565 












B £NDM 














a MAC® 


TKMT N,A 


5&6 












17S614*N 


S67 
568 
569 












B EN0M 














.MACR 


TBUPP N|A 


570 












175616*N 


571 












a gNDM 




572 
















573 
















57a 




00017a 








8 al?fl 




575 


00017a 


177570 






SRPTRl 


177570 




576 


000176 


000000 






S0PT8RI 


mmm 




577 




000200 








.B200 




578 


000200 


012737 


801022 


000300 




MOV 


#8TART,§TAD 


579 


000206 


000007 








BR 


8TC0NT 


5B0 


000210 


R12737 


001016 


000300 




MOV 


$REMAP,STAO 


581 


000216 


000003 








8R 


STCONT 


582 


000220 


012737 


002020 


000300 




MOV 


#M0DEV»8TAD 


583 


000226 








STCQNTI 






58a 


000226 


012706 


001200 






MOV 


#8TKPTR,1£& 


585 


000232 


013706 


000006 






MOV 


6,«(SP) 


586 


000236 


013706 


000000 






MOV 


0,»(3P5 


587 


0002a2 


012737 


000256 


000000 




MOV 


#1S#0 


588 


000250 


005777 


177720 






T8T 


f»8RPTR 


589 
















590 


00025a 


00000a 








BR 


gS 


591 


000256 


012717 


0)00176 


000170 


135 


MOV 


#80FTSR,Sf?PTR 


592 
















593 


00026a 


022626 








CMP 


(6)*,C6)* 


59a 


000266 


012fa37 


000000 




2S2 


MOV 


(6)*»0 


595 


000272 


012637 


000006 






MOV 


(&)*,§ 


596 


000276 


000137 








JMP 


•(PC)* 


597 


000300 


000000 






8TAD8 







598 




001200 








»8l§@0 




599 


001200 


0(90000 






RXC3B! 







600 


001202 


000000 






RXSUPl 







601 


00120a 


000000 






TXCSR8 







602 


001206 


000*0010 






TXBUFS 








IPUT LINE IN R0 
*G0 TO COMMON INTERRUPT SERVICE 



{ADDRESS OF RECEIVER LINE # i A* 



{ADDRESS OF RECEIVER BUFFER LINE # * k 4 



{ADDRESS OF TRANSMITTER C8R LINE # • 'A' 



{ADDRESS OF TRANSMIT BUFFER LINE • 'A* 



{SET UP FOR NORMAL START 

{CONTINUE 

{SET FOR A REMAP START 

{SET TO MODIFY ON START 

{SET BOTTOM OF STACK 
{SAVE CURRENT VECTOR 

{SET UP TIME OUT VECTOR 

{TRY TO REFERENCE THE 

{HARDWARE SWITCH RESISTER 

{BRANCH IF NO TIME OUT TRAP OCCURRS 

{CHANGE THE SWITCH REGISTER POINTER 

{TO POINT TO A SOFTWARE SWITCH REBI8TER 

{RESTORE THE STACK 

{RESTORE TIME OUT VECTOR 

{JUMP TO SELECTED START 



{RECEIVER CSR UNDER TEST 
IRECESVER BUFFER UNDER TEST 
{TRANSMITTER CSR UNDER TEST 
{TRANSMITTER BUFFER UNDER TEST 
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603 
600 
605 
606 
607 
608 
609 
610 
611 
612 
613 
610 
615 
616 
617 
618 
619 
620 
621 
622 
623 
620 
625 
626 
627 
628 
629 
630 
631 
632 
633 
630 
635 
636 
637 
638 
639 
,600 
\*\ 
602 
603 
600 
605 
606 
i«T 
608 
609 
650 
651 
632 
653 
650 
655 
656 



001210 
001212 
001210 
001216 
001220 
001222 
001220 
001226 
001230 
001232 
001230 
001236 
001200 
001202 
001200 
001206 
001250 
001252 
001250 
001256 
001260 
001262 
001260 
001266 
001270 
0012'72 
001270 
001276 
001300 
001302 
001300 
001306 
001310 
001312 
001310 
001316 
001320 
001322 
001320 
001326 
001330 
001332 
001330 

001336 
001-300 
001302 
001300 
001306 
001350 
001352 
001350 
001356 
001360 



000000 
0002A0 
000000 
000200 

177560 
177562 
17756^ 
17756a 



000200 
000060 
000200 
000000 
000000 
006020 
006500 
006602 
006700 
007070 
007706 
002350 
002350 
003122 
003200 
000000 
002512 
002012 
002366 
003002 
003072 
002000 
002250 
002310 
002530 
002710 
002732 
003066 



000000 



000000 



RHVTRi 


OPEN 


RXLVLI 


PRTT4 


TKVTRf 


OPEN 


TKLVLI 


PRTYO 


TKSl 


177560 


TKBi 


1TT362 


TPSl 


177560 


TPBi 


177566 


TKVTRl- 


60 


TKLVL8 


PRTYO 


TPVTRI 


60 


TPLVL1 


PRTY4 


PRGNUM8 


OPEN 


PRGIDI 


OPEN 


PRGTA18- 


PR80 




PROi 




PR8J 




PRG3 




PRQO 




PRGS 




INePRI 




INCPRG 


EMTTABS 


TYP 




YYP8 




OPEN 




ERR 




DT0HK 




CHLT 




STRVRV 




STXMTV 




EHLt 




SAV88 




RSTR8 




ERR1 




TJJFRR 




RXfRR 




DLY 


PARBIT1 


OPEN 


COUNT! 


OPFN 


8AVE1 


OPEN 


LINE! 


OPEN 


CONFIGI 


OPEN 


NUMBERI 


OPEN 


OLDPSi 





TfiPCI 





FROMPCS 





FTITLEI 





FN0NI8 





FMAPI 





TEMPI! 





LINENOI 





RECDAT! 


OPEN 


XMTDATi 


OPEN 



{RECEIVER VECTOR 

{RECEIVER PRIORITV LEVEL 

{TRANSMITTER VECTOR 

{TRANSMITTER PRIORITV LEVEL 

IL3R CSR 

{LSR BUFFER 

{LSP CSR 

IL8P BUFFER 

ILSR INTERRUPT VECTOR 

{LSR PRIORITY LEVEL 

SLSP INTERRUPT VICTOR 

{LSP PRIORITY LEVEL 

{CONTAINS CUftltENT PROGRAMS 

{CONTAINS PROGRAM INDICATORS 

|PRG@ START ADDRESS 

?PR8i START ADDRESS 

fPRGt START ADDRESS 

7PR63 START ADDRESS 

IPRGS START ADDRESS 

fPRGS START ADDRgSS 



IPOINTER TD TTPE8UT ROUTINE 

{POINTER TO CHAINED MESSAfgS. ROUTINE 

rPOXNTER T0 RANDOM STALL ROUTINE 

{POINTIS ffl ERROR ROUTINE 

{POINTER TO DATA CHECK ROUTINE 

{COMMON HALT 

{POINTER TO ROUTINE TO SET RCVR VECTOR AND PRIORITY. 

{POINTER TO ROUTINE TO SET XMIT VECTOR AND PRIORITY 

{POfNTfR TO ERR98 HALT ROUTINE, 

{POINTER TO SAVE REGISTERS ROUTINE 

{POINTER TO RESTORE REGISTERS ROUTINE 

{POINTER TO fRROR ROUTINE 

rPOINTER TO 8MIT ERROR ROUTINE 

{POINTER TO RCVR ERROR ROUTINE 

f POINTER TO DELAY ROUTINE 
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657 


001362 


07)^000 




656 


00136a 


000000 




659 


001366 


G500000 




660 


001370 


020000 




661 


001372 


5(00000 




662 


00137a 


000000 




6635 


001376 


000000 




66a 


001400 


000000 




665 


001402 


000000 




666 


00140a 


000000 




667 


00ia06 


000000 




666 








669 


00U10 


000000 




670 


00H12 


000000 




671 


00iai4 


000000 




672 








673 








67a 


00iai6 


005037 


001344 


675 


001022 


012706 


001200 


676 


001426 


000005 




67? 


00ia30 


005037 


177776 


676 


00iasa 


012737 


004520 000004 


679 


00iaa2 


012737 


000040 000006 


680 


001450 


005737 


001344 


661 


00145a 


001145 




6B2 


00iaS6 


104000 




663 


001460 


012012 




66a 


001462 


005237 


001344 


665 


001466 


005037 


001346 


636 


00H72 


012737 


177777 001334 


667 


001500 


012737 


001530 000004 


638 


001506 


012737 


000340 000006 


689 


001514 


01270a 


010432 


690 


001520 


5)05237 


001350 


691 


00152a 


020027 


010530 


6^2 


001530 


00U77 




69 3 


001532 


005037 


177776 


69a 


001536 


00577a 


000000 


695 


001542 


000200 




696 


00154a 


000240 




697 


0015a6 


000004 




698 


001550 


062704 


000002 


699 


00155a 


022626 




700 


001556 


000760 




701 


001560 


011437 


001352 


702 J 00156a 


000537 


003530 


703 


B01570 


001352 




70a 


001572 


012150 




05 


00157a 


000006 




706 


001576 


000537 


003530 


707 


001602 


001350 




708 


001604 


012106 




709 


001606 


000002 




710 


001610 


011001 




OZDLBB 


MACYU 


27£fe57) 
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SRC 






711 


001612 


000737 


004704 


712 


001616 


052737 


000001 001330 


713 


00162a 


002777 


000100 177352 


7ia 


001632 


052777 


000100 177344 


715 


00i6a0 


000200 




716 


00i6a2 


012737 


000340 177776 


717 


001650 


005737 


001210 


718 


00165a 


001006 




719 


001656 


013701 


001350 


720 


001662 


006301 




721 


00166a 


013761 


001210 010334 


722 


001672 


002777 


000100 177304 


723 


001700 


5)04537 


003530 


72a 


00170a 


001210 




725 


001706 


012166 




726 


001710 


000000 




727 


001712 


104000 




728 


00171a 


012146 




729 


001716 


005237 


001346 


730 


001722 


062704 


000002 


731 


001726 


000674 




732 


001730 


012737 


004520 000004 


733 


001736 


012737 


000040 000006 


73a 


0017aa 


003737 


001346 


735 


001750 


0010P7 




736 


001752 


104000 




737 


00175a 


012176 




738 


001756 


005037 


001344 


739 


001762 


000000 




740 


00176a 


000137 


001422 


741 


001770 


005037 


177776 


742 


00177a 


104000 




743 


001776 


012213 




74a 


002000 


004737 


003314 


7as 


002004 


012600 




70& 4 


' 002006 


042700 


177770 


7a7 ' 


• 002012 


010037 


001340 


7ae 


002016 


006300 




749 


002020 


000170 


001344 


,730 








*3i 


002024 


012706 


001200 


752 


002030 


000003 




733 


002032 


005037 


177776 


754 


002036 


100000 




735 


002040 


014033 




756 


002042 


004737 


003314 


757 


002046 


011600 




758 


002050 


042700 


177740 


759 


002034 


006300 




760 


002036 


022627 


000036 


761 


-002063 


101403 




762 


002064 


104000 




763 


002066 


014363 




76a 


002070 


000762 





CARMSKJ 

CTRDJ 

TXCSRTI 

RXCSRTI 

TEMPI 

SRT! 

IN8UPPI 

BUFFPI 

CALLERI 

CALLED! 

OTBUFPI 



OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 



T8UFFPI OPEN 

MODEM! OPEN 

OPEN 



REMAP! CLR 
START! MOV 

RESET 
CLR 
MOV 
MOV 
TST 
BNg 
TYPE 
MTITLE 
INC 
CLR 
MOV 
MOV 
MOV 
MOV 
MAP*» INC 
CMP 
6E0 
CLR 
TST 
NOP 
NOP 
BR 
ADO 

P0P8PS 
BR 
MOV 
JSR 
TEMPI 
MDAOR 
6 

JSR 

LINENO 
MLINE' 
2 
MOV 



MAPNEI 



MAPOK! 



^CONTAINS ADDRESS FROM WHERE NEXT TRAN» 
ISMITTED CHAR 9 (IN OUTBUF) IS TO COME 

ICONTAINS MODEM TYPE 0»103, 4*208 
ICONTAINS ADDRESS FRpM WHERE NEXT TRANS- 
MITTED CHAR. (CALLER'S LINE) IS TO COME 



FTITLE 
MTKPTR.Xfc 

PSW 

8ERTP,MACHER 

840,MACHER+2 

FTITLE 

START1 



ISET BOTTOM OE SP STACK. 



ITITLE PRINTED 
fYES. SKIP THIS 



FTITLE 

FNONE 

#»1»LINENQ 

#MAPNE»MACMER 

#PRTY7,MACHER*2 

#&C8R f %4 

LINENO 

84.9RBUP 

MAPEND 

PSW 

0(4) 



MAPOK 
#g,X4 

MAPA 

(43, TEMPI 
BS.OACNV 



ISET TITLE PRINTED FLAS 
»CLEAR NO DEVICE FLAG 



73ET UP FOR NO DEVICE ANSWER 
?SET UP DEVICE POINTER 



JLA8T DEVICE 
IVES 



ITEST DEVICE 



fSAVE DEVICE FOR TYPING 



31,0ACNV 



(4)031 



JSST WXGSR DEVICE ADDRESS 
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JSR 
BIS 
BIC 
BIS 
NOP 
MOV 
TST 
BEO 
MOV 
ASL 
MOV 

MAPQKAI Bie 
JSR 
RXVTR 
MTRAP 
4 

TYPE 
MLINg 
INC 
AOD 
BR 

MAPEND! MOV 
MOV 
TST 
BNE 

MAPERR8 TYPE 
MNQNE 
CLR 
HALT 
, JMP 

STARTli CLR 
TYPE 
M3WB5L 



I 



S7.P0RMAD 
SBIT0,FMAP 
#BXT6,9TXC8R 
$SIT6,0TMCSR 

#PRTY7,PSW 

RXVTR 

NAPOKA 

LINING, »1 

«i 

RXVTR,VeCTABet) ISTORI VECTOR 

#BIT6,«TXe8R 

%S 8 0ACNV 



FNONE 

#8,84 

MAPA 

SERTP, HACKER 

#A0rMACHER*2 

FNONE 

STARTl 



FTITLE 



START 

PSW 



MQDEVi 
MODgVt 



J8R 


PC.ROOCT 


MOV 


(SP|*,%8 


BIC 


#177770, *0 


MOV 


»0,PRGNUM 


ASL 


«8 t 


JMP 


#RR&TAB(8) 


MOV , 


#8TKPTR,S6 


RESET 




CLR 


PSW 


i TYPE, 




MM0D1 




JSR 


PCiRDOCT 


MOV 


(SP)»X8 


BIC 


3177*740, *0 


ASL 


80 


CMP 


(8P)*,#36 


BLOS 


M0DIV2 


TYPE 




MMODK 




BR 


M0DEV1 



J«|T INPUT 

f'CM) TO R8 

fLIMIT (8*5 TO BITS 1-0 

ISAVE PROGRAM # 

IR0XI 

»B0 TO SELECTED PROiRAH B 



I GET INPUT 



IBRANCH IP * 38 



DZDLBB MACYU 2?Cfe573 
D2DL8B.SRC 



i7»Nnv»?? h;S0 page is 



765 
76fe 
767 
768 
769 
770 
771 
772 
773 

77 a 

775 
776 
777 
778 
779 
780 
781 
782 
783 
784 
785 
786 
787 
788 
789 
790 
791 
792 
793 
79a 
795 
796 
797 
798 
799 
800 
801 
802 
803 
804 
805 
806 
807 



810 
811 
812 
813 
814 
815 
816 
817 
818 



002072 
00207a 
002076 
0021M 
002106 
002110 
002112 
002114 
002116 
002120 
002122 
002126 
002130 
002134 
002136 
008142 
002144 
002150 
002152 
002156 
002160 
002164 
002166 
002172 
002174 
' 002176 
002200 
002204 
002210 
002212 
002216 



002222 
00222a 
002230 
002234 
002236 
002242 
002246 
002252 



002254 
002260 
00226a 
002266 
002270 
002272 
002274 
002276 
002302 
002306 
002310 



104000 
014553 
fl-04737 
032716 
001«03 
104000 
014a05 
000766 
012601 
010003 
062703 
010113 
062701 
010003 
062703 
010113 
062701 
010003 
062703 
010113 
062701 
010003 
062703 
010113 
104000 
014621 
004737 
022627 
001712 
0105037 
000137 



011646 
162716 
017616 
006116 
0a2716 
062716 
017&16 
000136 



012637 
012637 

010446 
010346 
010246 
010146 
010046 
013746 
013746 
000002 

000000 



003318 

000001 



010432 

000002 

010530 
000002 
010626 
000002 
010724 



303314 
T7777 



001344 
001422 



177001 
001264 
000000 



002310 

002312 



002312 

002310 



M0DEV2I TYPE 
MMfiD2 

JSR PC.RDO 
BIT 
BEG) 
TYPE 
MMODO 
BR 

MQD£V38 MOV 
MOV 
ADD 
MOV 
ADR 
MOV 
ADO 
MOV 
ADR 
MOV 
ADO 
MOV 
ADD 
MOV 
ADD 
MOV 
TYPE 
MMODS 
JSR 
CMP 
BEQ 
CLR 
JMP 



IGET INPUT 



SBTT0, CSP) 
M0REV3 



MQDEV2 

(SP)*,%1 

S0,%3 

#RC8R,5£3 

*i.C3) 

#2.*1 

X0.%3 

#RBUP,3S3 

£1,(3) 

• 2,%1 

%0,83 

#tcsr,ss 

31. C3) 

#8.*1 
S8,83 
#TBUP,%1 
%i,C3) 



PC»ROOCT 
CSP}*, #17777? 
M0DEV1 
PTITLE 
START 



I 

IEMT TRAP INTERPRETER 



EMTINTI 



EMTA1 



MOV 

SUB 
MOV 
ROL 

axe 

ADD 
MOV 

JMP 



ISAVE REGS 
8AVR6S MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 
SVRFCi OPEN 



#2.@U 
#C63.S>%6 

#177001, $%h 
#EMTTAB.P%6 
#C6),@%6 
#(6)* 

4 SUBROUTINE, 

C63*,SVRPC 

C&3*,3VRP8W 

S4.-U3 

S3.-C&3 

%a,»(6) 

B1.-C63 
%0,»C&3 
SVRP$W,«(63 
8VRPC,»C&3 



I8AVE OEV AOR 



JUPOATE DEV ADR 



IUPDATE DEV ADR 



JUPDATE DEV ADR 



IGET INPUT 



J6ET SAVED PC e 
JDECREMENT PC BV 2 9 

JEMT ARG * a. 
JREMOVE 7 MSB, 
JFORM EMT RTN ADDR 9 

?B0 TO EMT ROUTINE', 



PSAVE Pe AND P8W 8 



;SAVE RE68 * 4 
PIN STACK, 



^RESTORE PC AND PSW 8 
»EXIT 9 
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819 
820 
821 
822 
823 
824 
825 
826 
827 
828 
829 
830 
831 
832 
833 
834 
835 
836 
837 
838 
839 
840 
841 
842 
843 
844 
845 
846 
847 
848 
849 
850 
851 
852 
853 
854 
855 
856 
857 
.858 

360 
S6l 
362 
863 
364 
865 
866 
867 
S63 
369 
870 
S?i 
872 



002312 000000 



002314 
002320 
002324 
002326 
002330 
002332 
002334 
002336 
002342 
002346 
002350 
002352 
002354 
002356 
002360 
002362 

002366 
002370 
002374 
002376 



012637 
012617 
012600 
012601 
012602 
012603 
012604 
013746 
013746 
000002 
000000 



002404 
002406 
002410 



002412 
002420 
002426 
002430 
002442 
002454 
002466 
002470 
002472 
002476 
002500 
002502 
002504 
002506 
0025.10 

002512 
002520 
002526 
002512 

002334 
002540 



104000 
013352 
000000 
000137 

011600 
162700 

000000 
000002 



005777 
100001 
000000 
000002 



043737 
123737 
001430 



104013 
01235? 
004537 
001364 
013343 
000004 
104013 
013300 
000002 

01271? 
012737 

00503? 

0.00413 

01163? 
017737 



002350 
002352 



002352 
002350 



0P1422 

000002 



175570 



001362 
001356 



001360 
001360 



1777?? 

000140 
002644 

002614 
800060 



002624 
$02626 



TO A SUBROUTINE, 
63*,RSTPC 



63* 
63* 
63* 

§3 

63 

&3 
RSTRSW 
R8TPC 



*R8?PSW 

i'XS 

«X1 

iX4 

»(63 
(&) 



SVRP8WI OPEN 

J 

IRESTORE REGS B 

R8TRG3 MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

RTI 
RSTPCB OPfN 
RSTPSW1 OPEN 
INCPRGI TYPE 

AINPR8 

HALT 

JMP 
?COMMON HALT ROUTINE 
eHLTI MOV #%&,$§ 

sua #2«%a 

HALT 

RTI 
t 

SCOMDmONAL ERROR HALT ROUTINE^ 
EHLTi TST BSWPTR 

BPL BHLTA 

HALT 
EHLTAI RTI 
I 

IDATA CHECK ROU?lNE a 
DTCHKi BXC CARMBKiXMTDAT" 

CMP© RECDAT.SHTOA? 

BE9' DTCHKA 

CNVOA RgC0AT,CWAS,l 



?SAVI PC AND P3W 9 



BTSRT 



RESTORE REGS 8 • 4 
IFROM STACKs 



IRESTORI PC AND P>SW 8 
JEKIT 

ITVP1 INCORRECT PROGRAM SELECTED 9 

fDEVltaP ADDRESi OF CALLER. 

?HALT 9 ADDRESS OP CALL INSTRUCTION 
UN DATA LIGHTS. 



ICHECK ROR HALT 0N ERROR* , 

I BRANCH IF NO HALT DESIRED- 

JHALT, 

UN DATA LIGHTS, 



iCLIftR UNTHAN8MJTTI0 BITS 
ICOMRARE TRANSMITTED AND RECEIVED 
?CHARS 9 BRANCH t? SAME, 



DTCHKAI 
¥ 

ERRI 



ERRll 



CNVOA 

CNVOA 

ERR0R1 

OSRADD 

JSR 

CTRD 

CRNUM 

4 

ERROR! 

CERDAT 

RTI 

MOV 

MOV 

CL® 

BR 

MOV 

MOV 



XMT0AT,C3S,3 
RKCSR,CSRADD,6 



SiBOCNV 



#»i,ERBB 

#i4§,BRRg*a 

ERR1 

ERRA 

#g&»ERRB 

#IRRB,ERRB 



r convert 

ICHAR # 
rTO DIBfHAL 
14 SITS 



I EaSf 8 

iiET UR ONE MESSAGE CALL. 



iDEVgLOR ADDta MESSAGE ADOR'* 
I STORE AT IRR8* 
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) 



iHI 



873 

87a 

875 
876 
877 
878 
879 
880 
88i 
88a 
883 
864 
885 
886 
887 
388 
839 
890 
8<?i 
892 
893 
894 
895 
896 
897 
898 
899 
900 
901 
90S 
903 
904 
905 
906 
907 
908 
909 
910 
<M1 
912 
913 
914 
915 
916 
917 
918 
919 
920 
921 
922 
923 
924 
925 
926 



002S46 

002562 
002370 
002572 
002576 
002604 
002616 
002620 
002622 
002624 
002626 
002630 
002632 
002634 
002640 
002642 
002644 



002646 
002654 
002656 
002664 
002666 
002672 
002674 
002676 
002702 
002704 

002710 
002722 
002730 
002732 
002744 
002752 
002736 
002764 
002772 
002774 
003000 
003006 
003020 
003022 
003024 
003026 
003030 
003032 
003034 
003040 



5*12737 
012737 
5*32777 
001020 
0116^7 
J62737 

'0«011 

104001 
012427 

000000 
177777 
104012 
104010 
063716 
000002 
000000 



012737 
000000 
012737 

000005 
012706 
104000 
014325 
013700 
006300 
000170 



012717 

000410 

012737 

011637 
017737 
032777 

001017 
011617 
16273? 

104001 
012427 



177777 

104010 
062716 

000002 



177777 

000002 
020000 

002642 

000002 



012466 

003024 
000042 
020000 

002642 

000002 



002626 
0026A4 
175«0a 



000024 
000024 



002656 
002646 

001200 

001240 
001244 

012445 003026 



003026 



003024 
173202 



002642 



MOV 

MOV 
ERBM BIT 

BNF 

MOV 

SUR 

CNiVOA 

SAVREG 

TYPES 

EM0 
ERRB1 OPgN 

»1 

R8TREB 
ERRC8 EHALT 

ADO 

RTT 
ERROI OPEN 
ERREl OPEN 
I 

(POWER FAIL 8ER 
PPAIL! MOV 



003042 0S7637 000000 003062 



HALT 
PWRUPi MOV 

RESET 

MOV 

TYPE 

MPWRF 
RESTRTf MOV 

A8L 

JMP 
I 
TXERRi CNVOA 

MOV 

BR 
RXERRl CNVOA 

MOV 
CRXTXl MOV 

MOV 

BI? 

§NE 

MOV 

SUB 

CNVQA 

TYPES 

EM@ 

crxtxai open 
crstxb8 open 

•I 

crxtxcs ehal? 
add 
rti 

i 

IROUTINE TO SET 
STRVRVi MOV 



#«"l,ERRB+2 

«2,ERRE 

«8IT13,#8RPTR 

ERRC 

#S6,ERRD 

«2,ERR0 

ERRDiAPC.6 



ERRE,#S6 



VICE 

0PWRUP.g>#24 



fXNHTBIT ERROR PRINT? 
(BRANCH TO INHIBIT PRINT*, 
IOEVELOP CALLING aoor. 

1CONVERT CALL AOOR TO ASCII 8 

(TYPE! 

(ERROR HEADER, 

JADDT'L ERROR MESSAGE IF ANY*. 



IGO ERR HALT IP OESIRED 9 
(EXIT, 



8PPAlL»$#g4 
SSTKPTR,S6 



PR6NUM,S8 

S3 

PPRGTABC0J 



TXC8RT,ATXWA8,6 (CONVERT CONTENTS OP TXC8R TO ASCII, 
#ATXC8R,eRXTXB 

crxtx 

rxcsrt, arxwa8»6 (convert contents op rxc8r to ascii, 

gARXCSRiCRXTXi 

(DEVELOP ADDR OF ADDTT*L ERROR MESSAGE,, 



msiCrxtxa 

SCRXTXA.eRXTXA 

#8IT13,#SRPTR 

CRXTXC 

«S6»ERRD 

#«,ERRD 

ERRD,APC e & 



»2,®%b 



(INHIBIT PRINT? 

(BRANCH TO XNHI8IT PRINT'. 

(DEVELOP CALLING ADDR e 

(CONVERT CALLING AOOR TO ASCII*. 
(TYPE ERROR MESSAGE. 
(ERR HEADER 
(ADDT*L eRR MESSAGE 
(TXC8R OR RXCSR CONTENTS,, 

(GO HALT XP DESIRED, 

(EXIT, 



RECEIVER INTERRUPT VECTOR AND PRIORITY 
#(6)iSTPRA*2 (MOVE VECTOR ADDR TO STPRA*2 
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927 
928 
929 
930 
931 
932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 
945 
946 
94? 
943 
949 
950 
951 
952 
953 
954 
955 
956 
937 
958 
959 
960 
961 
962 
963 
964 
965 
966 
9,67 
963 
969 
9?0 
97i 
97g 
973 
974 
975 
976 
977 
978 
979 
980 



003050 
003054 
003060 
003064 
003070 



003072 
003100 
003104 
003110 
003114 
003120 



003122 
003126 
003130 
003134 
003136 
003142 
003150 
003152 
003156 
003160 
003166 
003170 
003174 
003176 
003204 
003210 
003212 
003214 
003222 
003226 
003234 
003240 
003242 

003244 
003250 
003252 
003256 
003262 
003270 
003272 
003276 
003300 
003304 
003306 
003110 
003312 



062716 
013701 
012721 
013721 
000002 



017637 
062716 
013701 
012721 
013721 
000002 



010037 
011600 
062716 
011000 
112037 
122737 
001003 
013700 
000002 
122737 
001412 
004737 
000760 
113777 
105777 
100375 
000207 
112717 
004737 
112737 
004737 
000736 



010037 
011600 
062716 
011037 
022T37 
001003 
013700 



013700 
104000 



000002 
001210 
000000 
001212 



000000 003112 



000002 
001214 
000000 
001216 



003312 

000002 

003242 
000100 

003312 

000045 

003176 

0032^2 
176014 



000015 
003176 
000012 
003176 



003312 

000002 

003306 
1TTT7T 

003312 

003312 



003242 



003242 



STPRAi 



I 



ADD 
MOV 
MOV 
MOV 
RTI 



S2,#U 
RXVTR,?i 

•open,*!)* 

RXLVL»(l»* 



ISET UP EXIT 

(SET VECTOR ADDRESS 
(SET. PRIORITY 
(EXIT 



(ROUTINE TO SET TRANSMITTER INTERRUPT VECTOR AND PRIORITY,, 



8TXHTVI MOV •Cft)flTf»M+t 

ADD #§,#*& 

MOV TXVT8,?J 

8TPPA1 MQV «SOPEN,UH 

MOV YXLVL,Cn* 

RTI 
( 
(SUBROUTINE TO OUTPUT ASCII MgSSASg ON TELETYPE PRINTIR 9 



(MOVE VICTOR AOOR TO §TPPA*S 
fSET UP EXIT 

(SET VICTOR ADDRESS, 
JSET PRIORITY 
JSXXT* 



TYPi MOV S0 ,SAVR8 

mov n&,m 

ADD #§,*%& 

MOV $%® f %® 

TYPAi MOVB C0)*,TYPDAT 

eMPB #iiS,TVPDAT 

BNg TVPC 

MOV SAVRB,8§) 

RTI 

003242 TYPC1 CMPB #4S,TYPDA¥ 

BEG TYPP 

JSR $?,TYPD 

BR TYPA 

176022 TYPDI MOy0 YYPDAY##YP8 

T8TB FTP.8 

BPL ft *4 

RTS %f ; 

003242 YYPP! MOVB #iS,YYPDAT 

JSR IT, TYPO 

MOVB nir'TVPOAT 

JSR 8?,TVPD 

BR TYPA 
TYPDAT1 OPEN 

(SUBROUTINE T# OUTPUT A SERIES OP ASCII HIBSA&ES ON TELETYPE PRINTER 



(SAVE 1 RS 
(GET ADDRESS, THAT CONTAINS MESSAGE ADDRE8S' S 
(SET UP EXIT. 

(ADDRfSS OP MESSAGE TO R@, 
JGET CHARACTER 
?CHECK POR*P H CHARACTIR 
S BRANCH IP NOT"**, 

|MCIt>ORI:'RI . 
(TERtfXWATOR CHAR. DONE. EXIT, 
ICHECK P0R»S\ 
l8RANCR t XF«S« 
(TYPE CHAR IN TYPDAY 

fOUTiUT CHARACTER Tp PRINTER 
SWAIT FOR DONE FLAG, 

JEXXT 

IMOVE CARSIAIE RETURN CODE TO TYPDAT 

(GO TY^ CHAR,, 

(MOVE LP CODS TO TYPDAT, 

i@0 TYPE CHAR, 



TYPSI 
TYP8AAI 



TY^SAi 

TYPSBi 



MOV 

MOV 

ADD 

MOV 

CMP 

BNF 

MOV 

RT? 

MOV 

TYPE 

OPEN 

BR 

OPEN 



1B«SAVRS 

®»s»ib 

'till* 

#S0,TYP8B 
**i»TYP8B 
TYPiA 
SAVR@,Sg 

SAVR@,S@ 



TYPIAA 



ISST ADRRISS THAT CONTAINS MESSAGE ADDRESS 
(UPDAff TO NEXT MESSAGE JESS 
f ADDRlSi OP MESSAGE TO SB 
(CHECK FOR TERMINATOR 
(BRANCH IF NOT TERMINATOR, 

IRE8T0RE R8 
(TERMINATOR, EXIT 

(CALL ON TYP SUB TO TYPE MESSAGE 
IADDR6SS OP MESSAGE GOES HERE 
»GO PROCESS NEXT MESSAGE 



3AVR0I 

( 

(SUBROUTINE TO RiAD OCTAL DATA PROM THE TILITYPE PRINTER 



QZOLBB 


MACYil 


??C65?3 


17»N0V«75 io:5 


PAGE 


S? 




DZDLBB* 


SRC 












98s 


003314 


»i ifeafe 




RDOCTi 


MOV 


f8P)i-CSP) 


98g 


003316 


ai00a6 






MOV 


%0,»CSP3 


983 


003320 


ajfliafe 






MOV 


Xl.-CSP) 


98a 


003352 


00*5004 




INDATj 


CLR 


XI 


985 


003324 


F050B7 


001324 




CLP 


COUNT 


966 


003330 


105777 


1756M 


RDDATl 


TSTB 


PTK8 


98? 


003334 


100375 






BPL 


ROOAT 


9S8 


003336 


1177A6 


175660 




MOVB 


»TKB.«fSP) 


999 


003342 


042716 


000200 




BIC 


#BIT7,(SP3 


990 


003346 


105777 


175652 


ECDATi 


TSTB 


0TP8 


99l 


003352 


100375 






BPL 


ECOAT 


992 


003354 


J 11677 


175646 




MOVB 


CSP) ,@TPB 


993 


003360 


122716 


000015 




CMPB 


#15, CSP3 


99a 


003364 


301432 






BEQ 


RETRN 


995 


003366 


122716 


000177 




CMPB 


#177,C8P1 


99fc 


003372 


001423 






BEO 


RREAO 


99? 


003374 


122716 


000060 




CMPB 


#601 C3P) 


998 


003400 


003020 






BGT 


RREAO 


999 


003402 


122716 


000067 




CMPB 


SIT, «8P5 


1000 


003406 


002413 






BIT 


RREAO 


1001 


003410 


005237 


001324 




INC 


COUNT 


1002 


003414 


022737 


000067 001324 




CMP 


#67, COUNT 


1003 


003422 


003407 






BLE 


RREAD 


1004 


003424 


006301 






A8L 


SSI 


1005 


003426 


006301 






ASL 


%i 


1006 


003430 


006301 






ASL 


%i 


1007 


003432 


162716 


000060 




SUB 


#6lf CSP) 


1008 


003436 


062601 






ADD 


fSP)*,%l 


1009 


003440 


000733 






BR 


RDBAT 


1010 


003442 


104000 




BREAD! 


TYPI 




1011 


003444 


013232 






DTgRR 




1012 


003446 


005726 






T8T 


CSP)* 


1013 


003450 


000724 






BR 


INDAT 


1014 


003452 


010166 


000010 


RgTRNl 


MOV 


%1.10C8P) 


1015 


003456 


005726 






T8T 


esp) + 


1016 


003460 


012601 






MOV 


CSP)*, 11 


1017 


003462 


012600 






MOV 


(8P)#»S0 


1018 


003464 


000207 






RTS 


PC 


1019 








i 






1020 








I8UBR0UTINR TO 


DELAY A SPEC 


1031 


003466 


011637 


003526 


OLVi 


MOV 


#386,DueNT 


1022 


003472 


062716 


000002 




ADD 


■n,$%h 


1023 


003476 


017746 


000024 




MOV 


#DLCNY»«C6) 


1024 


003502 


001407 






8E0 


DUYC 


1025 


003504 


012746 


000226 


DLUt 


MOV 


#BI6r"U) 


1026 


003510 


005316 




QUVBi 


dec 


#16 


1027 


003512 


001376 






BNH 


DLYB 


1028 


003514 


005726 






P0P8P 




1029 


003516 


005316 






DEC 


»X6 


1030 


003520 


001371 






bne 


DLYA 


1031 


003522 


005726 




OLVCI 


POPSP 




1032 


003524 


000002 






RTI 




1033 


003526 


000000 




DLGNTi 


OPEN 




1034 








i 







JM6KE ROOM FOR DATA WQRD 

l§AVE R0 

ISAVE Rl 

&CLEAR DATA WORD 

ISET N0 9 OP DIGITS ■ 

ITEST TTY READ STATUS 

FWAIT 

IPUSM DIGIT ON STACK 

JTEST TTY PRINT STATUS 

IWAJT 

rECHO CHARACTER 

118 IT A TERMINATOR? 

IBR IF YES 

IIS IT A RUBOUTt 

IBR IF YES 

IIS IT AN OCTAL DIGIT? 

IBR IF NO 

ITEST AGAIN 

?BR IF NO 

IINC NO, OF DIGITS 

IMORE THAN SIX DIGITS? 

IBR IF YES 

ICLEAR LOWEST THREE BITS 

fOF DATA WORD 

ICONVIRT TO BINARY 

IADD DIGIT TO DATA WORD 

IGET NEXT DIGIT 

9TELL USER ABOUT ILLEGAL CHARACTER 

I6ET RIO OF ILLEGAL CHARACTER 
ISTART SUBROUTINE AGAIN 
ISTORE DATA WQRO ON STACK 
IINC STACK POINTER 
IRESTORE Ri 
IRESTORE R0 
IRETURN 



SPECIFIED NUMBER OF MILLISECONDS , 
IGET DELAY COUNT ADDRESS,, 
ISET UP EXIT ADDRESS 
IDELAY COUNT TO STACK 



II MSEC COUNT TO. STACK 

IDECREMINT 1 MSEC COUNT 

ISRANCH IF NOT B, 

IZERO, UNCOVER MSECS* COUNT* 

IDECREMENT IT 

IBR IF NOT DONE DELAYING 

IDONE 

lIXIT. 

ICONTAINS MILLISECONDS COU ADDRESS. 



DZDLBB MACYll 27f65?3 i7«N0V»75 
DZDLBB a SRC 



iflts® page is 



1035 








IOCTAL 


TO ASCII 


CONVERT 


ROUTIN 


E 


1036 


003530 


104011 




OACNVS 


SAVREG 






iSAVE REGS* 


1037 


003532 


013500 






MOV 


«C5)+iM 




IGET OCTAL VALUE. 


1038 


003534 


012501 






MOV 


C5)*«*i 




IGET DESTINATION ApDR 9 


1039 


003536 


012502 






MOV 


csy*,si 




IGET CONVERT COUNT. 


1040 


003540 


060201 






ADD 


%%,%i 




IDEVELOP AODR TO STORE 1ST CHAR 9 


1041 


003542 


010003 




OACNVAS 


MOV 


xt.xs 






1042 


003544 


0a2703 


177770 




BIC 


#sm?i, 


S3 


lISOLATE LEAST SIGNIFICANT DIGIT 


1043 


003550 


062703 


000060 




ADD 


#6@,S3 




ICONVIRT DIGIT TO ASCII, 


1044 


003554 


119341 






MOVB 


«#•(» 




ISTQRE ASCII CHARACTER, 


1045 


003556 


042700 


000007 




Bie 


#7,Si 






1046 


003562 


006000 






ROR 


ss 






1047 


003564 


006000 






ROR 


is 






1048 


003566 


006000 






ROR 


%® 






1049 


003570 


005302 






Die 


n 




lOONg ALL DSIITS? 


1050 


003572 


001363 






BNE 


QACNVA 




JBRANBH If NOT DONE, 


1051 


003574 


104012 






R8TREG 






IRESTORE RE§8. 


1052 


003576 


000205 






RTS 


3§ ' 




ID0N| B gXJT. 


1053 








ISUBROUTINE TO 


GENERATE 


PARITY 


ON DATA FOR 3»$#?»8 LEVEL. CODE 


1054 








IPARITY 


BIT IS 


THE MSI OF THE 


CHARACTER PARITY CAN BE EITHER 


1055 








IEVEN OR ODD 








1056 








IGENERATES ODD/gVIN PARITY* 





DZPLB8 MACYII ?7(65?3 i7»NOV»7<5 14|5& P&Gg ?0 
QZOLBB s SRC 



) 



1057 










? 






1058 


003600 


032737 


(S00200 


001362 


GgNPARI 


BIT 


#8IT7,CARMSK 


1059 


003606 


91014 1 1 








BEQ 


EIGHT 


10&0 


003610 


03P737 


ES00100 


001362 




BIT 


#BlT6,CARMSt< 


1061 


003616 


001027 








BEQ 


SEVEN 


1062 


003620 


032717 


000000 


001362 




BIT 


#BIT5,CARMSK 


1063 


003626 


0014J2 








BEO 


SIX 


1064 


003630 


000U33 








BR 


FIVE 


1065 


003632 


012717 


000200 


001322 


EIGHT! 


MOV 


0BIT7, PARBIT 


1066 


003640 


012737 


000007 


001324 




MOV 


#7, COUNT 


10*67 


003646 


0U2701 


177600 






BIC 


#177600, XI 


106S 


003652 


000413 








BR 


DOIT 


1069 


003654 


012737 


000000 


001322 


SIM 3 


MOV 


#BIT5, PARBIT 


1070 


003662 


012737 


000005 


001324 




MOV 


*5, COUNT 


1071 


003670 


002701 


177700 






BIC 


#177740,81 


1072 


00367a 


000422 








BR 


DOIT 


1073 


003676 


012737 


000100 


001322 


SEVEN! 


MOV 


8BIT6, PARBIT 


107a 


00370a 


012737 


000006 


001324 




MOV 


*6t COUNT 


1075 


003712 


042701 


177700 






BIC 


#i7TTB0,Xl 


I07fe 


003716 


000011 








BR 


DOIT 


1077 


003720 


012737 


000020 


001322 


FIVE! 


MOV 


#BITO, PARBIT 


1078 


003726 


012737 


000004 


001324 




MOV 


#4, COUNT 


1079 


00373a 


002701 


177760 






BIC 


8177760, XI 


1080 


0037a0 


000000 








BR 


DOIT 


1031 


0037a2 


010137 


001326 




D0IT8 


MOV 


Xl,8AVE 


1082 


0037a6 


006001 






AGAIN! 


ROR 


%i 


1083 


003750 


103015 








BCS 


ADD1 


108a 


003752 


005337 


001320 




RTNi 


DEC 


COUNT 


10@5 


003756 


0101373 








BN? 


AGAIN 


1086 


003760 


032737 


B00040 


001374 




BIT 


#BITS,8RT 


1087 


003766 


001003 








BEQ 


DONE 


1088 


003770 


063737 


001322 


001326 




ADD 


PARBIT, SAVE 


1089 


003776 


013701 


001326 




D0NI1 


MOV 


SAVEitU 


1090 


00a002 


000207 








RTS 


7 


1091 


00400a 


063737 


001322 


001326 


ADDll 


ADR 


PARBIT, SAVE 


1092 
1093 

109a 


004012 


000757 








BR 


RTN 










I8U8R0UTINE TO 


SELECT UNI A? 


109S 


00a0ia 


100000 






LXN8EL1 


TYPE 




109& 


004016 


014256 








LDLINE 




1097 


004020 


000737 


003310 






JSR 


PC»RDOCT 


109S 


004024 


012601 








mov 


t8P)*,Xl 


1099 


000026 


002701 


177007 






§ie 


#177407,11 


1100 


004032 


006201 








ASR 


%l 


1101 


004034 


006201 








ASR 


%i 


1102 


000036 


010137 


001372 






MOV 


%1»TIMP 


1103 


004042 


012703 


001200 






MOV 


#RXC3R,XS 


110a 


004046 


012704 


000004 






NOV 


#4,14 


1105 


000052 


016102 


010432 






MOV 


Re§RCi5,xa 


1106 


004056 


010223 






LIN8A1 


MOV 


XX, CJ)* 


1107 


000060 


1^62702 


000002 






ADD 


•S,XX 


1108 


004060 


005300 








DEC 


14 


1109 


004066 


0)01373 








BNg 


LIN8A 


1110 


000070 


01615)1 


010334 






MOV 


VgeTA@fl),Il 



PTEST LSB CHAR LENGTH 

»CHAR 18 8 

(TEST MSB CHAR LENGTH 

(CHAR LENGTH IS 7 



IPLACE PARITV BIT IN PROPER POSITION 

ISET UP ROTATE COUNTERS 

;MA3K OFF UNUSED BITS 

IGO AND GENERATE PARITY FOR 8 

0PLACE PARITY BIT IN PROPER POSITION 

ISET UP ROTATE COUNTERsS 

IMA8K OFF UNUSED BITS 

IGO AND GENERATE PARITV FOR 

IPLACE PARITY BIT IN PROPER POSITION 

ISET UP ROTATE C0UNTERb6 

JMA8K OFF UNUSED BIT8 

100 AND GENERATE PARITY FOR 7 

IPLACE PARITY BIT IN PROPER POSITION 

ISET UP ROTATE C0UNTERb4 

IMASK OFF UNUSED BIT8 

IGO AND GENERATE PARITY FOR 

ISAVE DATA 

IROTATE DATA 

HP CARRY SET ADO IN PARBIT 

^DECREMENT COUNTER 

INOT DONE DO IT AGAIN 

IDONE EVEN OR ODO PARITYf 

rXF EVEN FINISHED 

IIP ODD ADD IN ANOTHER 1 

JPLACE DATA * PARITY BACK IN Rl 

IAND EXIT 

IAOD PARBIT TO DATA 

IRETURN TO COUNTER 



!GET INPUT 

ILOAD Ri 
IMASK OFF ALL BUT LINE BITS 



ISAVE LINE # 

ILOAD ADDRESS OF REGISTERS 

I8IT UP COUNTER 



IGET LINf VECTOR AD0RE8S 



DZDLBB MACY11 2?C6573 17«N0V«?5 Ul50 ^AGE 25 
OZDLBBsSRC 

MOV 
CMP 
TST 
MOV 
CMP 
BNE 
RTS 
ASR 
CNVOA 
TYPE 
ALINES 
ITS 
I 

fSUBStOUTINg TO 
INFILI eLRB 



™ii|ir 



mi 


004074 


010123 




1112 


004076 


022121 




1113 


004100 


005723 




1114 


000102 


010113 




1115 


000104 


022737 


000005 


1116 


004112 


001001 




1117 


004110 


000203 




1113 


004116 


006237 


001372 


1119 


000122 






1120 


000130 


104000 




1121 


000136 


013665 




1122 


000140 


000205 




1123 








1124 








1125 


004142 


105037 


001330 


1126 


004146 


012500 




1127 


004150 


012537 


001360 


1128 


004154 


113720 


1334 


1129 


004160 


105237 


- • 330 


1130 


004164 


005337 


-a* 1364 


1131 


004170 


001371 




1132 


004172 


000203 




1133 








1134 








1135 


004174 


104011 




1136 


004176 


012301 




1137 


004200 


012502 




1138 


004202 


012503 




1139 


000204 


112122 




1100 


000206 


005303 




li«l 


000210 


001375 




1102 


004212 


100012 




1103 


004210 


000203 




1100 








1143 








1106 


000216 


100011 




1107 


000220 


012700 


003374 


1108 


000220 


013501 




1109 


000226 


012537 


000300 


1130 

hsi 


000232 


012537 


000306 


000236 


012702 


004362 


1132 


300202 


012737 


000003 


1133 


000250 


012237 


004360 


iisa 


000234 


000737 


000314 


1133 


000260 


005337 


000330 


1136 


000260 


001371 




1137 


000266 
000272 


163700 


004306 


1158 


010037 


004301 


1139 


004276 


000537 


004170 


1160 


004302 


000000 




il&i 


004304 


000000 




1162 


004306 


000000 




1163 


004310 


100012 




1164 


000312 


000205 





Xi.CJ)* 

Ci)*,Cl>* 
C3>* 

!i,C33 

#|,PR©NUH 

.♦4 

3 

TEMP 

TEHP.TLINWM 



ILOAD INTO PROS e RXVTR 
?ADD *4 TO RXVTR TO ■ TXVTR 
IP0INT TO PROG TKVTR 
ILOAD INTO PROS TXVTR 
iRUNNfNG PROGRAM # 3 

IRETURM TO PROG S 
IP08ITI0N 

iTYPi LINE # THAT 
IWAS CALLED 



FILL! 
FILLAI 



MOV 
MOV 
MOVB 

iNes 

DEC 

BNE 
RT8 



LOAD BINARY COUNT PATTERN INTO OUTPUT BUFFER 

NUMBER UNITIALIZE BINARY COUNT 

C3)*,Si IGET ADDRESS 

CS}**eTRO IGET COUNT 

NUMBgR»C§5* fLOAp ADDRESS NITH BINARY COUNT 

NUMBER UNO? BINARY COUUT 

CTRD ?D£C a COUNT 
FILLA 

S lEXXT 



A VARIABLE NUMBER OF BYTES* 
I SAVE HE§t. 
IGET»P&0M»APDRISS 
l6ET n T0«AODRIi8 
ISET; COUNT 
FMOVEirlYTE 
IDECRSMENT COUNT 
IBRANCH IF NOT DONE, 
r-KE«T0|lE-RE1M. 
JDONEsfgfT 



iSUBRC-UTINg TO MOVE 
SMOVEl 8AVREG 

MOV {S)+»X1 

mov m*,sa 

MOV CX}*»X3 

BMOVAi MOVB C 1 1 ■&• * CS3 

DEC XB 

BNE BftOVA 

RSTRIG 

RTs m 

I ....-..„- 

IBINARY TO DECIMAL ASCII eOWVfflT SUBROUTINE^ 



BDCNVS 



3DCNVAI 



BDCNVS! 
BDCNVC1 



SAVRE® 

MOV 

MOV 

MOV 

MOV 

MDV 

MOV 

MOV 

DEC 

BNE- 

8UB 

MOV 

JSR 

OPEN 

OPEN 



BDCNVDI OPEN 

RSTRfg 
RT8 



#D«?cyAL»x® 
cs)t»BDCNve 

C9^»eOCNVD 

fAOTENPpXS 

•XiCMVCTE 

(»)*»TXMPWX 

X7»SUBTfM 

CNtfCTR 

SDCNVA 

BDCNVB,X8 

XS,BD6NV§ 

XS,SMQVg 



11 



I @ AVE &E68* 

ISET UF'AOOH. Tfl STORE DECIMAL ASCII IN R0 

iBINAlY; VALUE TO Ri. 

IDESTINATION. ADDS TO BDCNVC 

I COUNT te SOCNVO, 

I ADDR OF , TEN POWER STRIN0 TO ftt. 

ItET Uf» ^OR 3 POWER CONVERSIONS, . 

iMOVf POWER OF TEN VALUE TO TINPWR B 

PPERf 9#l CONVERSION 

IDONE 9 CONVERSIONS?. 

I BRANCH IP MOT YET 3. 

ISET UP ADDR TO MOVE DECIMAL 

IDATA FWM. 

IMOVE DECIMAL DATA TO DSSTINATION 9 

I8RC.ADDR.. 

IDES? ADDR, 

I count; 

fRESTQRS RE08 S 
IVES, EMIT 9 



DZDL8B HACYil S7C&S73 
nZDL8B e S^C 



|?«N0V»'?«3 l&lW 



1165 

i ifefe 

1167 
i 168 
1169 
1170 
UTi 
11T2 
1173 

U7a 

1175 
1176 
1177 
1178 
1179 
1160 
1181 
1182 
1133 
1164 

nas 

1186 
1187 

1 i aa 

1189 
11*0 
11*1 
11*2 
11*3 
11*4 
1195 
1196 
1197 
1198 
1199 
1200 
1201 
1202 
1203 
1204 
1205 
1206 
1207 
1203 
1209 
1210 
1211 
1212 
1213 
1214 
1215 
1216 
1217 
1218 



004314 
004320 
004324 
0043?6 
004332 
004334 
004340 
004346 
004352 
004354 
004356 
004360 
004362 
00436a 
004366 
004370 
004372 
004374 
004377 

004402 
004404 
004406 
004412 
004416 
004430 
004432 
004434 
004442 
004450 
004452 
004460 
004466 
004470 
004476 
004500 
004506 
004510 
004516 



004520 
004526 
004534 
004540 
004544 
004550 
004556 
004564 
004570 
004574 
004576 
004600 
004602 



0050^7 
163701 
S03403 
0*05217 
0l007?g 
0637011 
db?737 
1137?0 
000207 

000000 
000000 
000000 
023420 
001750 
000144 
000012 
000001 
060 
040 



013055 
004737 
012637 

104000 
013355 
012737 
032737 

001413 
012737 
032737 

001403 
012737 
000207 
032737 
001773 
012737 
000767 



013737 
012737 
006237 
006237 
006237 
042737 
013737 
011637 
004517 
001340 
012314 
000006 
004537 



004356 
004360 



004360 
000060 
004356 



(303314 
001374 



SUBTPNt CIS? 

SUBTNAI SUB 
BC8 
INC 
BR 

3UBTN88 ADO 
ADD 
MOVB 
RTS 

CNVCTRf OPEN 

DIGIT! 



040 
040 



177700 

il 



177740 

000001 
177600 



!77776 

000340 
001336 
001336 
001336 
177740 
001336 
001342 
003530 



001362 
001374 

001362 
001374 

001362 

001374 

001362 



001336 
177776 



DIGIT 
TENPWR,%1 
8UBTNB 
DIGIT 
8UBTNA 
TENPWR,%t 
#60, DIGIT 
DIBIT, £03* 



1CLEAR DIGIT 

ISUBTRACT TEN POWER PROM SINARV VALUE, 

IB&ANCH IF UNSUCCESSFUL SUBTRACTION, 



IRESTORE SUBTRACTED VALUE, 

ICONVERT (DIBIT) TO ASCII 

?MOVE ASCII CHAR TO DECVAL FIELD* 

lEXXT. 



OPEN 



TENPWR1 OPEN 
ADTENPI 10000 8 

1000 9 

100, 

10. 

1 
DEeVAU .BYTE 040,040,040,040, 040,040 



^SUBROUTINE TO SET 
SETPAR! TYPE 

SELPAR 

JSR 

MOV 

CNVOA 

TYPE 

PARMT8 
TBIT1I MOV 

BIT 

BEQ 

MOV 

BIT 

BE0 

MOV 
PAREXi RT8 
STPARAI BIT 

BED 

MOV 

BR 



CHARACTER LENSTH PARAMETER 

fTYPEl SELECT PARAMETERS, 



PC.RDOCT 
(SP)*,8RT 

8RT,APARM,3 

#177400, CARMSK 

#BIT1,SRT 

8TPARA 

#177700, CARMSK 

#BIT0,8RT 

PAREX 

#177740, CARMBK 

If 

#BIT0,SRT 

STPARA«I 

#177600, CARMSK 

PAREK 



J6ET INPUT 



BST8 8 



MET CHARACTER MASK TO 3 

MEE IF 8R BIT 1 IS SET, 

MRANCM IF NOT SET 8 

ICHANSI CHAR MASK TO 6 BIT3 B 

MEE IF BR BITS IS SET. 

IBRANCH IF NOT SET. 

ICHANOI CHAR MASK TO 5 BITS, 

IEXXT 9 

ISEE IF 8R BXTB IS SET. 

JBRANCH IF NOT SET. 

ICHAN6E CHAR MASK TO 7 BITS* 



?|RR0R TRAP HANDLER * TYPE TO 
ERTPI MOV PSW, OLDPS 



001336 
001340 



ERTPA1 



MOV 
ASR 
ASR 
ASR 
BIC 
MOV 
MOV 
JSR 

Tope 

MTO 

h 

JSR 



#PRTY7iPSW 

OLDPS 

OLDPS 

OLDPS 

#t7770i,0L0P8 

OLDPS, TOPC 

@I6*FR0MPC 

%5,0ACNV 



ISaOACNV 



AND FROM WHERE ERROR TRAP OCCURS 
ISAVE OLBPS 



DZDLBB MACYil ?7(657) 

DZDLBB 9 SF?C 



i7»N0V ra 75 14150 PASE IT 



1219 
1220 
1221 
1222 
1223 
1224 
1225 
1226 
1227 
1228 
1229 
1230 
1231 
1232 
1233 
1234 
1235 
1236 
1237 
123a 
1239 
1240 
1241 
1242 
1243 
1244 
1245 
1246 
1247 
1243 
1249 
1250 
1251 
125S 
1233 
1254 
1235 
1256 
1257 
1253 
1259 
1260 
12&1 
1262 
1263 
1264 
1265 
126& 
1267 
1263 
1269 
1270 
l«7l 
1272 



004610 
004612 
004614 
004616 
004620 
004622 



004626 
004632 
004634 
004640 
004646 
004652 
004654 
004662 
004670 
004676 
004702 



004704 
004710 
004714 
004720 
004724 
004730 
004734 
004740 



004742 
004750 
004756 



001342 

012346 



004766 
004772 
004774 
004776 
003004 
005012 
005014 
005022 
005024 
005026 
005034 
005040 
005046 
005050 
005052 
005054 
005056 
005064 



104000 
012247 

000000 

000137 



011637 
022626 

011637 
162737 

005737 
001746 
013737 
162737 
013737 
005037 
000002 



010137 
062701 
010137 
062701 
010137 
062701 
010137 
000207 



017737 
032737 
001046 
042777 
005777 
104000 
013251 
017737 
032737 
001771 
052777 
104016 
023420 
017737 
005777 
032737 
001003 
104015 
013377 
000741 
017737 
00177? 



001342 
000004 
001350 

001340 



001340 
001330 



001200 
000002 
001202 
000002 
001204 
000002 
001206 



17423S 

020000 



000146 
174210 



174176 

040000 



17A146 
174142 



FROMPC 

MFROM 

6 

TYPE 

MTgRR 

HALT 

JMP START 

fHAPVgC m MAP VICTOR VECTOR OR REPORT EfttOff DEPINOINi ON FMAP FLAB 



MAPVEet 



001214 
001340 
001210 



MOV 

P0PSP1 

MOV 

SUB 

TST 

BEQ 

MOV 

BUB 

MOV 

CLR 

RTf 



$SS6,T0PC 

n&iPROMPe 

#4, TOPC 

FMAP 

IRTPA 

TQPCTXVTR 

#4. TOPC 

TOPC^RXVTR 

FMAP 



INOT MAPPIN6, WORT ERROR 
MTORT VEeTOft 



IFORMAD • FORM DEVICE AT AODftfttS 
FORMADi HOV UiRXCBR 



ADD 
MOV 
ADD 
MOV 
ADD 
MOV 
RTS 



#3,11 

llai^BUF 

si,txcs8 

wax 

S1,TXBUF 

If 



001370 
001370 



I 

MUBROpTXNE TO HAKEmLXNE CONtllOTXON. 



LXNCONt 



174212 L1NCA1 



001370 
001370 



LlNOBl 



000006 174156 



174116 
174112 



f@1370 
001370 



001370 LINCFI 



MOV 

BIT 

INg 

BIC 

TST 

TYPE 

MAKCON 

MOV 

SIT 

BE@ 

SIS 

DELAY 

1(3301, 

MOV 

TST 

BIT 

SN1 

ERRRX 

LINCHM 

BR 

MOV 

TST 



SRKC8R,R?C$8r 
•JIITU.IIXCWt 
LtfoEUP 
fUft+BRXCBR 

gRXBUP 



■mwQntTtsm 

#EITHURXC8Rt 

LINCB 

fttftftXOBR 



tlXOSRjRXeSRf 

PRXSUF 

•BtTlSiRXCMT 

LIMCF 



LINCA 

fRXCSRsRXCSft? 

#RX1UF 



?YES 8 1$ BLEAR ?0 SEND MP 

iyeb tmmntttm is made, 

fCLEJfrft' U BIT AND DTR, R@ TO SND 

fCUtlMt B0N1 FLA@ 

lTV#t 

f'MAKE LINE CONNECTION* 

lOIO ¥0U RSN® 
ISO WAIT FOR RINB 
MET, DTR* Rg TO 8ND 
IWAIT if .aCCANDt FOR 
I CLEAR l& SEND 

fCLIAR DONE 

IIS CI TO SfNO UPf 

9YEi« B© TO LINCP 

fNO. MXMT gftR@ft MESSAGE 

I s eLEAR TO 8ENB NOT SET* 

ISTART OVER A6AIN 

ICLEAR ALL FLAB8 

SAND DONE 



OZOLBB MACVI1 ?7 CfeST} i?«N0V«-75 |fl!50 PAGE 2® 
OZOLBB.SRC 



") 



1273 


005070 


104000 








TYPE 




»TYPE MESSAGE 


sa?fi 


005072 


0l3a27 








L1NM&D 




ICONNECTION TS MADS' 


i2?5 


00*507$ 


0B0305 






LINEUP! 


RT8 


5 


1EXXT LINE CONNECTION ROUTINE WITH 


1376 










JSUBROUTJNE TO 


DVERLAY <CRLF> IN DATA PATTERN (EVERT 72„ND CHAR5 


12?? 


005076 


012701 


014710 




nvRuvi 


MOV 


S0UTBUF.X1 


fGET OUTBUF ADDRESS 


1278 


005102 


012702 


000016 






MOV 


#14. t %2 


JGET COUNTER 


1279 


005106 


012711 


105215 




0V&LYA8 


MOV 


#105815,(13 


IINSERT CRSLF 


1260 


005112 


062701 


000110 






ADO 


S72 8 #X1 


FADO OFFSET 


1281 


005116 


00531^2 








DEC 


%2 


FDONE? 


1282 


005120 


001372 








BNE 


OVRLYA 




1233 
12@4 
1235 


005122 


00021517 








RT3 


7 


JEXIT 










JRECEIVER INTERRUPTS COMMON HANDLER 


1236 


005124 


000240 






RX8RI 


NOP 






123? 


005126 


010037 


001310 






MOV 


510, LINE 




1236 


005132 


006300 








A8L 


X0 




1239 


005134 


016017 


010432 


001200 




MOV 


RC8R(@),RHCS& 


IBET ADDRESS OF INTERRUPTING DL11»E*8 RCSR 


1290 


005142 


017737 


174032 


001370 




MOV 


#R«C8R,RKC3RT 


»6ET C8R CONTENTS 


1291 


005150 


100570 








BMI 


DCERR 


JCHECK XNT 


1292 


005152 


105737 


0013?® 






?ST8 


RHCSR?' 


fTEST DONE 


1293 


005156 


001002 








BNE 


RISRA 




129ft 


005160 


104003 








ERROR 




?FALSI INTERRUPT 


1295 


005162 


000002 








RTI 




lEXIT 


1296 


005164 


020037 


001404 




RISRA1 


CMP 


10, CALLED 


»DXO CALLED LINE INTERRUPT! 


129? 


005170 


001020 








BNE 


RI8RB 


^BRANCH IF CALLER INTERRUPTED 


1293 


005172 


005737 


001412 






T8T 


MODEM 


fCHECK MODEM TYPE 


1299 


005176 


001403 








BBO 


RISRAA 


IBRANCH IF IBS 


1300 


005200 


005770 


010530 






T8T 


#RBUFC03 


JREAD CALLED LINES DATA 


1301 


005204 


000002 








RTI 






1302 


005206 


117077 


010530 


174162 


RI8RAA1 


MOVB 


#RBUF(@5,#SNBUFPI8T0RI CHARACTER XN INPUT BUFFER 


1303 


005214 


005237 


001376 






INC 


INBUFP 


^INCREMENT POINTER 


1304 


005220 


02271? 


017024 


001376 




CMP 


#IN8UF#lB@ 8 ,XN@UFP»HAVE 10B e CHARACTERS BEEN RECEIVED! 


1303 


005226 


001430 








310 


RISRC 


IGO CHICK DATA IF VE8 


1306 


005230 


000002 








RTI 




JEHIT IF NO 


1307 


005232 


117077 


010330 


17A140 


RlSftBl 


MOVB 


PRBUF(B5,#BUFPP 


»8T0RE CHARACTER IN INTERMEDIATE DATA BUFF 


130S 


005240 


005237 


001400 






INC 


iUFFP 


1 INCREMENT POINTER 


1309 


005244 


022737 


015066 


001400 




CMP 


#BUFF*IB.|BUFFP 


IHAVE 10 CHARACTERS BEEN RECEIVED 


1110 


005252 


002401 








BUT 


.♦« 




1311 


005254 


000002 








RTI 




IEXIT 


1312 


005256 


022737 


000002 


001332 




CMP 


#a,coNFie 


fRUNNXNg CONFIBURATION 2? 


-313 


005264 


S01405 








BEGS 


RISRBB 




314 


005266 


022737 


01522® 


001400 




CMP 


&iUFP*i@i 8 ,BUPFP|HAVg i@0, CHARACTERS BEEN RECEXVEDf 


315 


005274 


001405 








BS9 


RX8RC 


}G0 CHECK DATA IF YES, OTHERWISE 


1316 


005276 


000002 








RTI 




IIXZT 


1317 


005300 


052770 


000100 


010626 


RX8RBB1 


813 


#BXT6 f #TC8RCi3 


JSTART CALLERS TRANSMITTER 


131S 


005306 


000002 








RTI 




IEX1T 


1319 










?CHEeK 


DATA CQNFX6URATI0N «1 




1320 


005310 


000240 






R18RC8 


NOP 






1321 


005312 


012737 


000001 


001364 




MOV 


#1,CTR0 


UNITIALIZE CHARACTER COUNT 


1322 


005320 


012702 


015054 






MOV 


#@UFF,Ii 


IPOINT Rl TO CALLERS RECEIVED DATA BUFFER 


1323 


005324 


5112703 


014710 






MOV 


#0UTBUF,%3 


fR3 v FIRST ADDRESS OF OUTPUT DATA BUFFER 


1324 


005330 


01023? 


001400 






MOV 


Sli*SUPPP 


JRS8T9RI CALLERS RCVO DATA BUFFER PTR 


1325 


005334 


02273? 


000001 


001332 




CMP 


#i»C0NFXB 


ICHECK CONFIBURATION 


1326 


005342 


001015 








mn 


RISRD 




DZOLBB 


MACYil 


27(6575 


ITssNOV* 


75 1&S30 PA§g 


29 






OZDLBB 


SRC 
















1327 


00534a 


11233? 


001360 




RISRCAI M0V@ 


C3)*iSM?DAT 


IBET TRANSMITTED CHARACTER 


1328 


005350 


112237 


001336 






MOVB 


ClHsRlCBA? 


IBET. RECEIVED CHARACTER 


1329 


005354 


104004 








DATCHK 




SCHICK DATA 


1330 


005356 


P05gS? 


001364 






INC 


CYRD 


IINCM CHARACTER COUNT 


1331 


005362 


022737 


000101 


001364 




CMP 


#iii»CTRD 


?HAS ALL DATA BEEN CHECKED 


1332 


005370 


001363 








BNE 


RXSRCA 




1333 
1334 
133S 


005372 


000137 


005476 






JMP 


FXNXSH 












lEHIGK 


DATA eONFliURATKJN #g 




1336 


005376 


000240 






RXSBDi 


NOP 






133T 


005400 


012704 


016660 






MOV 


•1NBUF.*« 


?POINT M TO CAUID LINES RECEIVER 


1338 


005404 


010437 


001376 






MOV 


MtJNBUFP 


PDATA BUFFER S XNIT. POINTER 


J 339 


005410 


01273? 


015034 


001410 




MOV 


#BUFF,t8UFFp 




1340 


005416 


013701 


001404 




RlSftDAf MOV 


CALLgDiXi 




1341 


005422 


016137 


010432 


001200 




MOV 


RCSRCn,RKCilt 




1342 


005430 


11233? 


001360 






MOV! 


£3)*,KMYpAT 




1343 


005434 


11223? 


001356 






MOVB 


CiS^REeDAT 


fCOMFa/RE, TRANSMITTED .DATA WITH DATA 
^RECEIVED BY CALLED LINE 


1344 


005440 


104004 








0ATCHU 




1345 


005442 


013701 


001402 






MOV 


CALLER, li 




1346 


0054A6 


01613? 


010432 


001200 




MOV 


RC|RCn,ffXC8ft 




134? 


005454 


11243? 


001356 






MOVB 


C45#,RICDAT 


iCOHRARETRANIHITTSD DATA WITH DATA 
fRECEXVED BY CA ( LUR 


1348 


005460 


104004 








DAJCHK 




1349 


005462 


003217 


001364 






INe 


e?RD 




1350 


005466 


02273? 


000101 


001364 




CMP 


•IBliCTM) 




1331 


005474 


001350 








BNg< 


RXSRDA 




1332 


005476 


000240 






FINISH 


1 NOP 






1353 


005500 


013701 


001404 






MOV 


CALU9#§i 




1354 


005504 


00453? 


004146 






J8R 


S,PILL 




1355 


005510 


014710 








OUTBUF 






1356 


005512 


000144 








10«. 






1337 


005514 


104000 








TYPE 






1353 


005516 


013350 








ENDPA8 






1359 


005520 


052??1 


000100 


010626 




BIS 


#Bifi,#?e8Reu 




1360 


005526 


000240 








NO? 






136| 


005530 


000002 








»TT 






1362 










jerror 


8BRYICE' BpUTJNE 




1363 


005532 


032770 


100000 


010330 


QgfRftg 


BIT 


#BSTtS»#RBUF(f) rTBBT ERROR 


1364 


003540 


001402 








B.EQ 


R|BRF 




136S 


005542 


104015 








ERRRB 






1366 


005544 


012337 








C8RAD0 






*367 


005546 


012717 


014710 


001406 


RISRFi 


MOV 


•OUTBUFiOTBUFP 


Ifgf OUfPUt BUFFER POINTER 


136S 


005534 


012737 


016660 


001176 




MOV 


#SN8UP ? XNiUPP 


ISET INPUT BUFf BR POINTER 


1369 


005562 


01273? 


013034 


001400 




MOV 


#8UFF,BUFFP 


I8ET SNTBRWEDlATf BUFFER POINTER 


1370 


S05570 


012737 


013034 


001410 




MOV 


#§UPF*YiUFFP 
#BtTU*ftXCBlT 


fBEJf, POINTER FOR eONFIB M TRANSMITTER 


137J 


003376 


032737 


mmm 


001370 




BIT 


9 CHICK RING INDICATOR 


1372 


005604 


001003 








BNE 


ribrih 


IBRANCH IF RIND- 


1373 


005606 
003612 


004737 


006134 






JSR 


?*BX8C0N 


1 ERROR SET » NO RIN6 


1374 


104015 








ERRRM 






1375 


005614 


012337 








CSRADD 






1376 


005616 


000002 








rtx 






137? 


§0363® 








RliRESJf CNVOA 


LINE.TLlNEtt 




1378 


005632 


1@4@@0 








TYPE 






1379 


003634 


013713 








ALINE 






1380 


005636 


01003? 


001404 






MOV 


lisCALLfO 





DZDL8B MACY11 ?7£fe^?3 
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1381 
1382 
1363 
138a 
1385 
13®6 
1387 
1368 
1389 
13^0 
1391 
13^2 
13^3 

139a 

1395 
1396 
1397 
1393 
1399 
1400 
1401 
1402 
1403 
1404 
1405 
1406 
1407 
1408 
1409 
1410 
1411 
1412 
1413 
1414 
1415 
1416 
1417 
1418 
1419 
1420 
.421 
1422 
1423 
1424 
1425 
1426 
1427 
1426 
1429 
1430 
1431 
1432 
1433 
143a 



005642 
005646 
5)0*1652 
005660 
005664 
S05672 
005674 
005700 
005702 
00570A 
005706 
005710 
005714 
005722 
005724 

005726 
005732 
005734 
005742 
005746 
005750 
005752 
005764 
005766 
005770 
005776 



006002 
006004 
006010 
006012 
006016 
006022 
006034 
006036 
006040 
0060U2 
006046 
006052 
006060 
006062 
006064 
006066 
006070 
006076 
006104 
006106 
006110 
00611*1 
006122 
00612*1 



004737 

011617 
c*«?7ji7 
01P637 
1*42717 
001042 
004717 
1040530 
014215 
!04016 
023420 
W0S7T0 
032770 
001004 
104003 

004737 
000002 
016037 
004737 
104000 
013427 

104000 
013456 

032770 
000002 



1 

014065 
004737 
012601 
042701 
5(10137 

104000 
014162 
006301 
010137 
004737 
052771 
104000 
014215 
J04016 
023420 
027071 
032770 
001007 
104003 
004717 
042771 
000002 
02273? 



003314 
001412 
177773 
001332 
177774 

006250 



010530 
020000 



010626 

004402 



001402 

006250 
000002 



010530 
020000 



006234 

000006 



001412 

001332 



01043? 



001204 RISRFBI 



000100 010626 



177740 

001330 



J8B 
MQV 

Bin 

MOV 

pic 

BNF 
JSP 

TYPe 

SUTTON 

DELAY 

10000 9 

T3T 

BST 

BNE 

ERROR 

JSR 

RTI 

MQV 

JSR 

TYPE 

LXNMAD 

CNVOA 

TYPE 

ACONFXG 

BIS 

RTI 



PC.RDOCT 
CSP>D , MODEM 
#177771, MODEM 
OP)*, CONFIG 
#177774 ( C0NFIG 
RISRFC 
7,C0NN 



0RBUPC0) 

#8IT13 e S»ReSRe@) 

RX3RPB 



7,DISC0N 



TCSRE0),TXe8R 
7,8ETP»R 



CONFIG, TCQNFXB, 2 



JGfT INPUT 

»GFT MODEM TYPE 

?0al03, 4ag®2 



150 TO SERVICE FOR CONFIG 1 OR I 
ICONNECT LINE IF CONFIGURATION 
ITYPE MESSAGE TO PRESS DATA 
IBUTTON ON DATA PHONE 
IWAIT FOR CARRIER 
110 SECONDS 

JREAD BUFFER TO CLEAR DONE 
JTE8T FOR CLEAR TO SEND 

IERR0R1 DID NOT RECEIVE CLEAR TO SEND 

IWITHIN TIME ALLOTTED C10 BBC) 

IDISCONNECT LINE 

IANO EXIT 

?GET CALLED LINES TXCSR ADDRESS 

ILOAD U@SR PARAMETERS 

ITYPE 'LINE CONNECTION 

fMADE 9 



.) 



#9!76,f>?eSRC0) 



010530 
310432 



010432 

001332 



I 

IHERE IF CONFIGURATION 

RISRFCS TYPE 

WRU 

JSR 

MOV 

BIC 

MOV 

CNVOA 

TYPE 

UR 

A8L 

MOV 

JSR 

BIS 

TYPE 

BUTTON 

DELAY 

10008 8 

CMP 

BIT 

BNE 

ERROR 
RI3RFDI JSR 

BXC 

RTI 
RlSRFFt eMP 0EfCONFX8 



1 OR 1 



PCiRDOCT 

CSP)*,8i 

#177740,11 

%i,LINE 

LINE,URA,2 



xi 

Mi, CALLER 
7, CONN 
#aiTl,iRBSRCi) 



BRBUFtflJ.MBUFll 
#BXTlS.#RCSRei3 

RISRFF 

7,DX8C0N 
ifciERCBRfl) 



5AND EXIT 



IASK USER WHICH LINE HE IS 
^DIALING ON 
IGET INPUT 

JGET LINE # 
fMASK UNUiEO BITS 



IREPOHT LINE $ ON TTY 



ISAVE CALLERS LINE # 

ICONNECT CALLED LINE 

?SET DTR ON CALLERS LINE 

ITYPE MESSAGE TQ PRESS DATA 

?0N DATA PHONE 

J WAIT 10 SECONDS. FOR CLEAR TO SEND 

ISET AT CALLED LINE 

3 JREAD BUFFERS 

JTEST FOR CLEAR TO SEND AT CALLED LINE 

jERRpRl CLEAR TO SEND NOT SET AT CALLED LINE 

IDXSCONNEC? 

ILXNE 

SAND EUf 



DZDLBB MACYli 27(6573 
DZDLBBaSRC 
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1435 
1436 
437 
43B 
439 
440 
441 
442 
443 
444 
445 
446 
447 
443 
449 
450 
451 
452 
453 
454 
455 
456 
457 
45S 
459 
460 
461 
462 
463 
464 
465 
466 
467 
468 
469 
470 
471 
47 2 
473 
474 
W175 
476 
477 
478 
479 
480 
481 
482 
483 
484 
1485 
I486 
1487 
1488 



006132 
006134 
006142 
006144 
006146 
006152 
006160 



001414 
022771 
001003 
104083 
000137 
016137 
000117 



01000S 010432 



006110 
010432 

00573a 



020000 010412 



BED 
eMP 
BNg 
ERROR 
JMP 
RISRFE1 MOV 
JMP 



006164 032771 

006172 001003 

006174 104003 

006176 000137 006110 

006202 016037 010432 

006210 016137 010626 

006216 004737 004402 

006222 016137 010432 

006230 000137 005734 



006234 042770 000006 
006242 005770 010432 
006246 000207 



0062*50 052770 000006 
006256 000207 



001200 
001204 



§01200 



010432 



010412 



006260 
006262 
006264 
006270 
0062?2 
006274 
006276 
006302 
006304 
006310 
006312 
006320 
006324 
006332 
006334 
006342 
006344 
006352 
006156 
006362 
036360 
0063f"l 
006374 
006402 



000240 

006300 

105770 010626 

100402 

104003 



001331 
001402 



005737 
001420 
020037 
001015 
117770 
005237 
022737 
001003 
042770 
000002 
11777® 
005237 
005717 
001010 
022737 
801340 
011737 
000002 



173072 
001410 

015220 



173036 
001406 
001331 

816660 

014710 



RISRFG 
«ITl8i#RCSRCiJ 

RJSRFf 

RISRFD 

RCSRCi),RKC3R 

RISRFB 



IHERE IF CONFIGURATION § 



RfSRFGI BST 
BNE 
ERROR 
JMP 

RISRFHS MQV 
MOV 
J88 

MOV 

JMP 



•BITl3##f»CBRCl5 
RISRFH 

RISRFD 
RCSRC0),R»CSR 

?esRU),7jcesR 

TiSETPAR 

rc8r6j,rxcsr 

RISRFB 



CHECK CARRIER AT CALLERS LINE 

ERROR! NO CARRIER AT CALLERS LINE 
GO DISCONNECT LINES 

GO GIT PAR1MET1RS AND ENABLE 
CALLED TRANSMITTER AND EMIT 



TEST CALLERS CLEAR TO SEND 

ERR0R1 NO CTS AT CALLERS LINE 
100 DISCONNECT LINE AND EXIT 



@Q GET PARAMETERS FOR CALLERS 
TRANSMITTER AND CALLED RECEIVER 



ISUBROUTINE TO DISCONNECT LINE RE HAS LlNf # 
DISeONl BIC #6,fRC8Re®3 

TST #ReSRC@3 

RT8 f 
I 

SUBROUTINE TO CONNECT LINE M HAS LINE E 
CONN! BIS Et,MOARtB) ISET Otis RO TO SND 

RTS 7 
ITRANSMJTTER INTERRUPT COMMON HANDLE® 
TI8R1 NOP 

»E 



010724 
001410 
010626 
010724 

@@|4f?6 

0S1406 



A8L 
T8TB 
BMI 
ERROR 
TXERAAI RTI 
TXSRAI TST 
BE@ 
CMP 
BNE 

Moya 

INC 

CMP 

BNE 

BXC 

RTI 

M0V8 

INC 

TST 

INg 

CMP 

BNE 

MOV 

RTI 



fTCSRCBS 
TIER A 



R@ HM.kSNE • 

CHECK FOR DONE 

BRANCH' IF .DONE . 

IRRBRI FALSE INTERRUPT 

EXIT ... 

THIS BtWMBUMTIO 0? 

BRANCH IF 7g§ 

DID CALLER INTIRRUPT 



TISRCI 



TXSRiil 



CONFIG 

TISRC 

|0 s CALLIR 

TISRC 

PT®UPPP,ifBUFfi3 ITRANSMIT 

T1UFFP llflP POINTER 

ElUrF»lEE.»TBUFFP 

«*10 

#BlT6,#TE8RCi) 

•OTBUFI»i»TBUFtE) JTRANSMXT THE NiKT, CHARACTER 
0T8UFP SSTEf POINTER TO NEKT CHAR, 

CONFIG lHAft e©HFliURAfION SELECTED 

TXSRi IBRANCH IF CONFIG #1 0® « 

#OUTiUF*lSi0 99 OTiUFP8HAVf' 1S0®» CHARS 9 BEEN SENT 
TISRAA fEXIT IF NOT 

#OU?BUF*0T@U^P IRESIT POINTER 
IANO WIT 
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H89 

1490 

ia*i 

ia^s 

U93 

149« 

ia95 

1496 

1498 

14?9 
1500 
1501 
1502 
1503 
1504 
1505 
1506 
150? 
1508 
1509 
1510 
1511 
1513 
1513 

isia 

1315 
151b 
1517 
151S 
1519 
1520 
1521 
1522 
1523 
152a 
1525 
1526 
1527 
1528 
1529 
1530 
1531 
1532 
1533 
153a 
1535 
1536 
1537 
1538 
1539 
1540 
15«i 
15^2 



006400 022737 015054 001406 TlSRBf CMP 

006413 001330 pNfr 

006414 0A2770 000100 010626 BIC 
006422 0007&fi BR 



006424 
006426 
006430 
006432 
006434 
006436 
006442 
006444 
006450 
006454 
006456 



iQUTBUF*100 a ,OTBUFP|HAVE 100. CHARS, BFEN SENTf 
TI3RAA IEXIT IF NOT 

#BTT6,@TCSRt01 IDI8ABLE TRANSMITTER INT?8RUPT 
TJSRRB iRESgT POINTER AND FXIT 



006462 
006466 

006472 
006476 
006502 
006510 
006514 
006520 
006524 
006526 
006530 
006534 
006536 



006540 
006542 
006544 
0P6552 
006556 
006560 
006562 
006570 
006S7A 
006600 
006604 
006612 
006616 
006622 
006626 
006630 
006632 



0002(10 
1040550 
012507 
104000 
013143 
004737 
112681 
010137 
004537 
014710 
014711 
001747 
004737 
004737 
00473? 
004737 
012737 
012702 
012701 
004537 
104000 
013251 
005017 
000001 
000776 



10400® 
012553 
012737 
004517 
014712 
00175® 
012737 
004737 
004737 
004717 
012737 
012702 
012701 
004537 
104000 
013251 
005017 



814710 
0041?4 



005076 
010274 
010226 
010162 
000340 
000140 
010432 
010116 



103215 
004142 



JPR60 - SINGLE CHARACTER LINE MODE TEST, 



j a *&& a a a «s a a 



NOP 

TYPE 

P0TIT 

TYPE 

3ELCAR 

JSP 

MOVB 

MOV 

JSR 

OUTBUF 

OUTBUF*! 

99«S 9 

JSR 



PC.RBOCT 

%1,0U?@UF 
§,BMOVE 



DATA 



?,OVRLAY 

JSR ?,LDPRI 

JSR ?,LDTvee 

J8R TjLDVECS 

MOV #PRT¥7,PSW 

MOV $140, MS 

mov mz&n,%i 

JSR 3,M0V1? 
TYPf 
MAKC0N 

CLR P8W 
PRG0AI WAIT 

3R PR@@A 

IPRG1 • SPECIAL BINARY COUNT PATTERN LINE MODI TIST 9 

PRGJI TYPE 
Pifl? 



IBEOIN PRS0 
fTYPE 
IPRO0RAM TITLE 



IGET INPUT 

I6ET USER SPECIFIED 
7AND 
ILOAD 
UNTO 
IOUTPUT 
IBUPPER 

fOVER LAV CR.LP^S IN DATA 
ILOAD PRIORITY LEVEL IN VECTOR*a 
ILOAD TRANSMITTER VECTORS 
ILOAD RECEIVER VECTORS 
ISET PROCESSOR PRIORITY*? 
ISET IE 

IBIT IN 
IALL RECEIVERS 
JTYPE 

|*MAKI LINE CONNECTION* 
I8ET PROCESSOR PRIORITYsS 
IWAIT 
IHERE 



ITYPE PROSRAH TITLE, 



0100 001334 



010274 
010226 
010162 
000340 
000140 
010&32 
010116 



MOV flBSBlS, OUTBUF 
JSR i s INFIL 
OUTSUF*t 

#|®g, NUMBER 

TsLDPRI 

TgLDTVEC 

TgLDVECS 

gPRTY?,P8W 

#140, Sg 

#RC8R,X1 

3,M0Vf? 



MOV 

JSR 

JSR 

JSR 

MOV 

MOV 

MOV 

JSR 

TYPE 

MASSCOM 

cm 



s^aw 



ILOAD eRLF 
ILOAD OUTPUT 
IWITH BINARY 
I COUNT PATTERN 

ILOAD PRIORITY LgVEL IN VECTOR *B 
ILOAD TRANSMITTER VECTORS 
ILOAD RECEIVER VECTORS 
ISET PROCESSOR PRIORITYs? 
I8ET IE SIT 

ISET FIRST eSR ADDRESS 
IAND MOVE IT 
ITYPE 

l*MAKS LXNE CONNECTION^ 
ISET PROCESSOR PRIORIT¥s@ 
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1543 
1544 
1545 
1546 
1547 
1548 
1549 
1550 
1551 
1552 
1553 
155a 
1535 
1556 
1557 
1558 
1559 
1560 
1561 
1562 
1563 
1564 
1565 
1566 
1567 
1568 
1569 
15?0 
1571 
1572 
1573 
13?4 
15T5 
1576 
137? 
15T6 
1379 
1380 
1381 
138g 
\583 
1334 
1335 
1336 
138? 
1388 
1389 
139g 
1391 
1591 
1593 
1394 
1393 
1396 



006636 000001 
0066A0 000776 



006642 
006644 
006646 
006652 
006656 
006664 
006670 
006674 
006676 
006702 
006704 
006712 
006714 
006720 
006724 
00673P 
006734 
006736 



006740 
006742 
006744 
006750 
006754 
006760 
006766 
006772 
006774 
006776 



007002 



007012 
007016 
007022 
007026 
007034 
00^040 
007046 
007053 
007034 
007036 
007064 
007066 



PffSjCl WAIT FWAXT 

BR PRB1C SNERE 
t &*#£&*&*&& 

IPRSI«SPECIAL MISSASI TRANSMIT ONLY THIS PROBRAM TRANSMITS 

I &&&$#& 

ITHI MESSAGE ^A QUSC8 IRONN 'POX JUMPED QVfR THE LAZY DOGS 
IBACK 18349t7S*l fl * 



012622 
00433? 
004737 
052777 
004557 
012702 
112201 
020127 
001772 
032737 
001402 
004717 
004337 
010177 
105777 
100375 
000756 



104000 
012672 
00453? 
004737 
012706 
052777 
00431? 
104006 
007036 
10400? 
007270 
003037 
013700 
012720 
013710 
012701 
05273? 
004737 
032777 
00303? 
000001 
0007T6 
01773? 
100461 
103717 



172314 



004014 
004402 
000004 
004742 
013304 

000043 



800100 001374 

003600 
004742 
178136 

172250 



004014 
004402 
001176 
000004 172211 



004742 



007470 
001334 
007422 
001236 
014710 
10®@®0 
007634 
000140 
17T776 



171116 

0013T0 



172112 



001370 



1 

PR@iS 


TYPE 




ITYPE PR08IIAM 




MTIT 




ITITLE 




JSR 


i 9 LlNSii 






JSR 


TrSlTM'H-. 


ISO §g? P*RAMIT|R8 




BIS 


#BI?8,0RXC8R 


ISET SUEST TO SEND 


PR@1A§ 


JSR 


S^LS&CON 


ISO H&Kg LINE CONNECTION 


PRSIS! 
PRBlCl 


MOV 


#PMiMi«8 


fBg? ABBESS OF MESSA8E 


MOVS 


CIH.Ii 


1 W f^aflT CHARACTER 




CMP 


%%M\ 


iTERHINtTO* CHARACTER 




BED 


PR@§I) 


rRf SINO A6S 




BIT 


#Hti s aRT 


IPARXTY tNAJBLED 




@E§ 


*♦* 






JSR 


f»@gNPAR 


IIENJRATE PARITY 
iCHgeH.llHg CONNECTION 




JSR 


S#UMCON. 




HOY 


fLO*0'^Ul?FW 




TSTS 


fTHBSR 


lANd WAIT FOR CHARACTER 




SPL 


9 «4 


I TO @g TRiNSHITTID 




SR 


mmt 


iBBt NfHT'CNAIIACTER. 


f &£$a**da$$ 






IPRO3i»PRO01|AM 


TO-'REOCIVE A .UNSAOlii 


|*ftftft**ft«*ft 






PR§3§ 


TYPE 




ttim^Mmnm 




P3TI? 




ItlTLf 




JSR 


taimtL- 






JSR 


T'#Wt^AHi . 


i@gf 5|8AMfTEU8 , . 


PR63AI 


MOV 


.•ttKPTRirtiW 




SIS 


mni^fmom 


iset: Mutt* te send 




JSR 


»,LINBON 


IHAKE LINf CONNECTION 

f$nr mininn interuft 




STBHV 






RINTi 




ITD THIS AOORfSS 




STW 




ISET TRA^SHITTIR INTERRUPT 




TINTS 




ITO THIS ADDRESS 




CLR 


WORDS 






MOV 


TPyTR.I® 






MOV 


#TfINT*C@)* 


ILDAB TIUPRJNTER VECTOR 




MOV 


TPLVL,C03 


IANP RRf0RiT¥ 




MOV 


#0UTPUP,1Si 


ISET SUP ADD 




BIS 


#SiT13»TFLag 


ISET, S|T 18 




JSR 


TfT'CRLP 


ISENO ORLF 


i 


SIS 


®im 9 m%z$n 


IINABLI RS£IS¥ER INTERRUPTS 




CLP 


PSW 






WAIT 




?D0 




BR 


»»§ 


INOTH1H0 


RINTSi 


MOV 


#t«C3R 9 RM03RT 


I8ET RKCSR 0A1A 




@M| 


iimu 


IBRANSH IF ERROR 




TSTS 


RS(CSRT 


ITIST 
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1597 
15^8 
1599 

1600 
1601 
1602 

1603 

1605 
1606 
1607 
1606 
1609 
1610 
1611 

uia 

1613 
1614 
1615 
1616 
1617 
1616 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1623 
1629 
1630 
1631 
1632 
1633 
163a 
1635 
1636 
1637 
1638 
1639 
1640 
16«1 
1642 
1643 
164a 
1645 
1646 
1647 
1646 
1649 
1650 



007073 
007074 
9)07100 
007106 
007112 
007116 
00712F 
007124 
007126 
007132 
00713a 
007140 
007146 
007150 
007154 
007156 
007160 
007162 
007166 
007170 
007172 
007176 
007204 
007210 
007212 
007220 
007226 
007230 
007232 
007234 
007242 
007244 
007246 
007250 
007252 
007254 
007256 

007260 
007264 
007266 

007270 
007276 

007302 
007304 
007310 
00731.0 
007316 
007320 
007326 
007310 
00731a 
007336 



100064 
005237 
017717 
113711 
17105737 
100a55 
105777 
100005 
105777 
I0037S 
111177 
5123727 

nouii 

005737 
100441 
121103 
001404 
122127 
001401 
000002 
005037 
042777 
012701 
010102 

052777 
052777 

000002 
104015 
013605 
0«2777 
000644 
104015 
012366 
000002 
104015 
013623 
000002 

00503? 
112103 
000002 

017737 
105737 
100016 
112177 
005237 
121103 
001431 
023737 
001025 
121127 
00ia22 
000002 



007A70 
172076 

007472 
007472 

171050 



172046 

007470 



007470 

00014© 

WlflTli 

000100 
000100 



171764 
171776 



000140 171736 



PPL 

INC 

MOV 

MQVS 

TST 

RMI 

T3TB 

BMI 

T8T8 

BPL 

MOVB 

RINT3A8 CMP 
BEQ 
TST 
BM! 
CMPB 
BEO 
CMPB 
F5E0 
RTI 

RJNT3B8 CLR 
BIC 
MOV 
MOV 
BIS 
BIS 

rti 

ERRRH 

LPAIL 

BIG 

BR 

ERRRB 

RINTM 

RTI 

ERRRX 

ROVER 

RTI 



ERR3AS 



ERR38S 



ERR3CI 



RINTSgS CUR 
MOVB 
RTI 



171710 

001366 



171676 

007a70 



007470 

000203 



001366 TINT3I 



MOV 

T8T8 

BPL 

MOVi 

INC 

CMPB 

BBS 

CMP 

3E9 

CMPB 

BE9 

RTI 



ERP3R 

WORDS 

•RXBUF,RXBUFT 

RX8UFT» (11 

RXBUFT 

ERR3C 

P3RPTR 

RINT3& 

®THCSP 

8 «4 

Cl5,#TXBUF 

WORDS, #900 8 

RINT3B 

TFLAG 

RINT3E 

tl),%3 

RJNT3B 

£D*,#aS3 

RINT3B 

WORDS 

$140i@RXC§R 
•OUTBUF+lpXl 
Xli%8 

#BIT&*gTXCSR 
#aiT6,$TP8 



#14Si#RKCSR 
PR83A 



TFLAG 



#TXCSR*TXC8RT 

T5JC8RT 

TINT3B 

CU*,#TXBUF 

WORDS 

T2NT3C 
WORDS, #908* 
TINT3C 

TXNT3C 



JECHO OPTION SELECTED 



lECHO CHARACTER 

JENO 0? BUFFER ALLOWED 

IYES EXIT 

IIS THIS THE FIRST 

SCHARACTER BRANCH IF VE8*. 

ILAST CHARACTER RECEIVED 



.) 



ICONTROL C 



IDI3ABLE RECEIVER 
UNITIALIZE BUFFER POINTER 

lENABLE TRANSMITTER 

I ENABLE TELEPRINTER 

IEXIT 

ITYPE ERROR MgSSASE 

I 

IDISABLE RECEIVER 

JTYPE 

IERROR MESSAGE 

IEXIT 



ISET TXCSR DATA 
ITEST 



^TRANSMIT CHARACTER 

JALL CHARACTERS TRANSMITTED 



fa C8NTR8L C 

IRITURN T8 MAIN PROSRAM 
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1651 
1652 


007340 
007346 


017737 
005077 


171660 
171652 


001372 


TINT3B8 


MOV 

CLR 


#TP3*TEMP 
0TPS 


J8AVE TELEPRINTER STATUS 
J0I3ABLE INTERRUPT 


1653 
1654 


007352 
007356 


105777 

100375 


171646 






T8TB 
BPL 


0TP8 

s »4 


IWAIT FOR 
ITELEPRINTER TO FINISH 


1655 
1656 
1657 


007360 
007362 
007364 


104014 
012407 
105777 


171634 






ERRTX 
TINTM 
T8TB 


?TP8 


fTYPE 

IERROR MESSAgE 

IWAIT FOR TELEPRINTER 


1658 
1659 


007370 
007372 


100375 
013777 


001372 


171624 




BPL 
MOV 


8 «4 
TgMP»#TPS 


?T0 FINISH 

FRE8T0RE TELEPRINTER STATUS 


1660 


007400 


000002 








RT? 




IEMIT 


1661 
1662 


007402 


042777 


00010© 


171574 


TINT3C1 


BIC 


#BIT6,PTXB8R 


IDI8ABLI INTERRUPT 


1663 


007410 


032777 


000100 


171606 




BIT 


#BIT6,PTP8 


IIS TTY ACTIVE 


1664 


007416 


001421 








BEQ 


PRS3EX 




1665 


007420 


000002 








RTI 






1666 










1 








1667 
1668 
1669 


007422 
007426 


112277 
121203 


171600 




1 

TPfNTS 


MOVi 

CMPB 


Ci3**#TPB 
(23, S3 


ITYPE 8MARACTSR 

?WA§ THIS THE LAST CHAR, 


1670 


007430 


001404 








SEO 


TPINTA 




1671 


007432 


121227 


000203 






CMPB 


(2J*#i§I 


is CONTROL C 


1672 


007436 


001401 








BEQ 


TPINTA 




1673 
1674 
1675 


007440 
007442 


000002 
042777 


00P100 


171556 


TPlNTAi 


RTI 

Bie 


#@IT6»#TPS 


IOISABLE INTERRUPT 


007450 


032777 


000100 


171526 




BIT 


•Bm.mcaR 


US TRANSMITTER ACTIVE 


1676 


007456 


001401 








BEO 


«*4 




1677 


007460 


000002 








RTI 




fEKIT 


1678 


007462 


000137 


006754 




PRG3EXI 


JMP 


PRS1A 




1679 


007466 


000000 






TFLA6! 









1680 


007470 


000000 






WORDS! 









1681 


007472 


000000 






RKBUFTI 


fl 






1682 
1683 










JPR@4»3PECIAL 


MESSAGE TRANSMIT 


ONLY, "THIS PROGRAM TRANSMITS 


1634 










|&*&&a&a&a<& 






1685 










IME88A8E SPIRAL PATTERN 




1686 
1687 


007474 


104000 






1 

PRfiftl 


TYPE 




FTVPI PR08RAM 


1688 


007476 


012730 








P4T1T 




ITITLE 


1689 
1690 


007500 
007504 


004537 
00473? 


004014 
004402 






JSR 
JSR 


5,LINiSL 

7,SETPAR 


fGO SET PARAMETERS 


\169i 


007510 


052777 


000004 


171462 




BIS 


#©IT2,PRSeiR 


ISET REQUEST TO SEND 


169g 


007516 


012737 


000110 


007652 




MOV 


#?a 9 ,C8LMN 


UNIT PA6E WIDTH 


1693 


007524 


012703 


000040 






MOV 


#40,0 


ISET LINE START CHAR 


1694 


007530 


004537 


0@474g 




PRgAAf 


JSR 


i;L!NCON 


ISO' MAKE LINE CONNECTION 


1695 


007534 


004737 


007654 






JSR 


7,TCRLF 




1696 


007540 


010302 






PR@S@1 


MOV 


X1>X8 


IGET FIRST CHARACTER 


1697 


007542 


110201 






PR04CS 


MOVB 


11,11 


IGST CHARACTER 


1698 


007544 


120127 


000136 






CMPB 


X1>#13* 


ITERMINATOR CHARACTER 


1699 


0075-50 


001003 








BNE 


PR@40 


IRISEND MESSAGE 


1700 


007552 


012702 


®@0040 






MOV 


#4@f?C2 




17@1 


007556 


000771 








BR 


PR64C 




1702 


007560 


032737 


000100 


001374 


PR04DI 


BIT 


#iIT6,SRT 


IPARITY ENAiLED 


1703 
1704 


007566 
g@7570 


001401 
0047S7 


m%tm 






BEG 
JSR 


s #6 
?,GgNPAR 


IBENIRATE PARITY 
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) 



1705 
1706 
1707 
1708 
1709 
1710 
1711 
1712 
1713 
ITU 
1715 
if 16 
1717 
1718 
1719 
1720 
1721 
1722 
1723 
172a 
1725 
1726 
1727 
1728 
1729 
1730 
1711 
1732 
1733 
1734 
1735 
1736 
1737 
173S 
1739 
17«0 
1741 
1742 
1743 
1744 
1745 
1746 
174? 
1748 
1749 
1750 
1751 
1752 
1753 
175a 
1755 
1756 
1757 
1758 



00757a 
0076P0 

007610 
007612 
007614 
007620 
007622 
007630 
007634 
007636 
007642 
007644 
007650 
007652 



007654 
007662 
007666 
007670 
007676 
007702 
007704 



007706 
007710 
007712 
007716 
007720 
007724 
007732 
007734 
007736 
007740 
007744 
007752 
007754 
007756 
007760 
007762 
007764 
007766 
007772 
007776 
010000 
01000(1 
010006 
0100U 
010016 
010022 



9110177 
135777 
100*375 
005202 
005337 
001350 
012717 
004737 
005203 
120327 
001336 
012703 
000733 
000000 



112777 
105777 
100375 
112777 
105777 
100375 
000207 



100000 

012777 

004537 
000005 
004737 
052777 
104000 
013251 
000000 
005777 
032777 
001003 
504000 
013377 
000764 
104000 
013427 
005037 
012702 
112201 
020127 
001440 
032737 
00U02 
004757 
032777 



003742 
171402 
171 374 



000110 
007654 



000015 
171316 



000013 
171302 



004402 
000006 



171236 

020000 



010114 
013504 



000045 
000100 



0036@@ 

020000 



JSP 
MOV 
TST8 
BPL 
INC 
DEC 
BNg 
007652 MOV 

JSR 
INC 
CMPB 
BNg 
MOV 

COLMNS 

I 

I3END CR LP 

; 

171324 TCRL^I MOVB 
T8TB 
BPL 
171310 MOVB 

T8TB 
BPL 
RT3 
f *&**&**&#$ 
IPROGRAM 3 

PRS31 TYPE 
PSTIY 
JSR 
RESIT 
JSR 
171246 BIS 

PRG3AI TYPE 

MAKCON 
HALT 
TST 
171226 BIT 

BNE 

PRGSAAI TYPE 

LXNCHM 

BR 

TYPE 

LINHAD 

CLR 

MOV 

MOVB 

CMP 

BIO 

BIT 

BER 

JSR 

BIT 



5,lINCON 

%1,FTXBUF 

#TXC8R 

,»£ 

5£2 

COLMN 

PR64C 

873 e »C0LMN 

7.TC&LF 

S3 

33. #136 

PR648 

#40, %3 

PRG4B 



#13,£TXBUP 
#TXCSR 
B *4 
#ia,0THBUP 

#msR 

,»4 

%1 



S,LINSEL 



7,8ETPAR 
#& 8 §»RXeSfi 



PRXSUF 

@BIT13ffRXCSR 

PRGSB 



PRG33S 



PRGSBBS 
PRGSCl 



PR8SA 



ERRCNT 
SPRG2M,5S2 
(13*, xi 

prgie 

#BIT6,SRT 
• ♦6 

? S GENPAR 

•BXTiSitRxcaft 



ICHECK LINE CONNECTION 
ILQAD BUFFER 
IAND WAIT FOR CHARACTER 
rTO BE TRANSMITTED 
»SET FOR NEXT CHAR 
IALL COLUMNS PRINTED? 
INO, GET NEXT CHAR 
JRE3ET COLUMN COUNTER 

IUPOATE LINE START CHAR 

ILAST IN SET 

tNO 

/YES. RESET 

IGET NEXT CHARACTER, 



JSEND CRiLP 



PSET OTR RQ TO 8ND 

fTYPE MESSAGE TO HAKE 

»LXNE CONNECTION 

fWAXT FOR USER TO MAKE LINE CONNECTION 

'READ BUPPER 

/TEST FOR CLEAR TO SEND 

?TYPE ERROR MESSAGE 

UNO TRY AGAIN 



IGET BASE ADDRESS OP DATA TO BE TRANSMITTED 

JGET A CHARACTER 

JWAS IT THE TERMINATOR? 

7UA3 PARITY OPTION SELECTED? 
fBRANCH IP NO PARITY DESIRED 
IGENSRATE PARITY ON CHAR. IN Ri 
tCHEd* CLEAR TO SEND 
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OZDLBB«SRC 



!7«*N0V«T5 14150 PAGE 3? 



1759 
1760 
1761 
1762 
1763 
1764 
1765 
1766 
1767 
1768 
1769 
1770 
1771 
1772 
1773 

177a 

1775 
1776 
1777 
1778 
1779 
1780 
1731 
1782 
1783 
1784 
1785 
1786 
1787 
1788 
1789 
1790 
1791 
1792 
1793 
1794 
1795 
1796 
179? 
1798 
.799 
1*800 
1801 
1802 
1803 
1804 
1803 
1806 
1807 
1808 
1809 
1810 
1311 
1312 



010030 
010032 
010036 
010042 
010044 
010046 
010052 
010054 
010060 
010064 
010066 
010070 
010072 
010076 
010102 
010104 
010106 
010110 
010112 
010114 



010116 
010124 
010132 
010136 
010140 
0101.42 
010144 
010152 
010160 



031751 
010177 
005777 
100001 
104003 
105777 
100375 
117703 
043701 
120103 
001403 
104003 
005237 
105777 
100375 
000734 
104000 
013350 
000727 
000000 



012737 
012737 

012700 
010231 
005300 
001375 
012737 
012737 
000205 



010162 
010166 
010172 
010176 
010202 
010206 
010210 
010214 
010216 
010220 
010222 
010224 

010226 
010332 
010236 
010242 
010246 
010252 
010254 
010236 



171150 
171140 



171122 

001362 



010114 
171102 



000804 MOVlTi 



012701 
012702 
012703 
012704 
032712 
001002 
010172 
060301 
005722 
005304 
001,367 
000207 

012701 
012702 
012703 
012704 
032712 

001003 

011200 
010160 



BEQ PRGSAA 

MOV %l,*TXBUP 

TST #R88UF 

BPL 9 *4 

ERROR 

TSTB PRKCSR 

BPL 9 *4 

MOVB PRXBUP#%3 

BIC CARM8K»»i 

CMPB X1»X3 

8E9 PR8S0 

ERROR 

INC ERRCNT 

PRG3DI TSTB PTXCSR 

BPL 9 *S 

BR PRSBC 
PRGSEi TYPE 

INDPAS 

BR PRGSBB 
ERRCNT § OPEN 

JTH28 ROUTINE MOVES THE CONTENTS 
rBY Ri 



000006 
000002 
000037 



004330 S@0804 



011012 
010334 
000010 
000037 

000001 



011412 
018334 
000010 
000037 
000001 



fTYPE ERROR M8G 9 IP NOT SET 

ITRANSMIT THE CHARACTER 

»ANY ERROR FLAGS? 

fBRANCH IP NO ERROR FLAGS 

fERRORl SOME ERROR PLA6 IS SET 

IWAIY FOR THE RECEIVER TO RECEIVE 

»THE TRANSMITTED CHARACTER 

ISAVI IT IN R3 

fCLEAR NON* TRANSMITTED fITS 

9WAS RECEIVED i TRANSMITTED DATA THE SAME 

9IRROR4 DATA ERROR 

IWAIT FOR TRANSMITTER TO FINISH 



MOV #6 9 <l 

MOV #!«& 

MOV #S1 9 »88 

movitai mov ve*«ei>+ 

DEC 10 

BNg MQVXTA 

MOV #E8TP,MACHgR 

MOV #40,MACHER*1 

RTS 3 

I 

^SUBROUTINE TO LOAD ALL VECTORS 



OF R8 TQ THE ADDRESS SPECIFIED 
SSST UP POR RETURN 



IGET COUNTER 

JNOVE THE DATA 
IALL DATA MOVED? 
»NO, RETURN 



LOVECSI MOV 
MOV 
MOV 
MOV 

LOVECSI BIT 
BNg 
MOV 

LDVIC1I ADD 
TST 
DEC 
8NE 
RT3 

f 

LDTVECS MOV 
MOV 
MOV 
MOV 

LOTVEDI BIT 
3NE 
MOV 
MOV 



#R!3Rg,jgl 
#VgCTAB,3£ 

#Sl.iM 

#@IT0,Cg5 
LQVECi 
%l,9tV 
83.S1 

cas* 

X4 

LDVECB 
? 

FTISRS.Si 
#VECTAB,Xa 

#3t,#Si. 

#BiT0,eti 

LDVEC2 
C|),X0 



IDOSS ?HI8 VECTOR EHS8T 
INO* SKIP LOADING 
ILOAD VECTOR 



INO, 



IDQI3 THIS VECTOR EXIST 
8RSP LOADING 



DZDLBB 


MATY! 1 


?7(6«>T) 17-N0V-75 


OZDLBB, 


sec 




1813 


010262 


0603*1 


1B14 


010264 


0057?g 


1815 


015)266 


005^04 


i Si 6 


010270 


0013hfe 


1817 


01027? 


000?07 


1818 






1819 






1830 


01027a 


012701 010334 


5821 


01030(1 


012702 000340 


1822 


010304 


012703 000037 


1823 


010310 


032711 300001 


1824 


010314 


001003 


1825 


010316 


011104 


1326 


010320 


010264 000002 


1827 


010324 


0105721 


1828 


010326 


005303 


1829 


010330 


001367 


1830 


010332 


000207 


1831 






1832 


010334 


000301 


1333 


010336 


000311 


133a 


010340 


000321 


1835 


010342 


000331 


1836 


0103a« 


000341 


1837 


010306 


000351 


1838 


010350 


000361 


1839 


010352 


000371 


1840 


010354 


000401 


1341 


010356 


000411 


184g 


010360 


000421 


1843 


010362 


000431 


1844 


010364 


000441 


1845 


010366 


000451 


1846 


010370 


000461 


1847 


010372 


000a71 


1848 


01037« 


000501 


1849 


010376 


0005U 


1850 


010A00 


000521 


185i 


010402 


000531 


1852 


010404 


0100541 


1853 


010406 


000551 


185« 


010410 


000561 


1855 


010412 


000571 


1856 


010414 


000601 


1857 


010416 


00061 1 


1858 


010420 


000621 


1859 


010422 


0E0631 


1860 


010424 


0006A1 


1861 


010426 


000651 


1862 


010430 


000661 


1863 






1864 




000000 


1865 




000000 


1866 


010432 
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LDVEC2! 


ADD X3»%1 




T8T C2)* 




DEC %a 




BNF LDTVFD 




RTS 7 


(ROUTINE TO LOAD PRIORITY 


LOPRII 


MOV #VECTAH,*l 




MOV 8340, %2 




MOV #3UiX3 


LDPRfAJ 


SIT #BIT0,G1) 




BNE LOPRIX 




MOV (ll,3S4 




MOV «a,2C4) 


LDPRIK1 


TST en* 




DEC S3 




BNE LDPRXA 




RTS 7 


(VECTOR 


ASSIGNMENT TABLE 


VECT&B1 


301 




311 




321 




331 




341 




331 




361 




371 




40) 




an 




4gl 




431 




441 




451 




461 




471 




501 




511 




321 




331 




541 




531 




561 




571 




601 




611 




621 




631 




641 




651 




661 


(DL11»E 


REGISTER ADDRESSES 




Nag 




A«S0 


Res®! 


«RgP? 31'. 



7 IN VECTOR +2 
(GET BASE VECTOR 
(GET LEVEL 7 
(LOAD COUNTER 

(DOES THIS VECTOR EKIST 
(NO SKIP LOADING 
(LOAD VECTOR *2 

(POINT TO NEXT VECTOR 
(DECREMENT COUNTER 



(LINE 





VECTOR 


(LINE 


i 


VECTOR 


iLINg 


3 


VECTOR 


(LINE 


3 


VECTOR 


(LINE 


4 


VECTOR 


(LINE 


5 


VECTOR 


ILXNC 


6 


VECTOR 


(LINE 


7 


VECTOR 


ILXNE 


10 


VECTOR 


(LINE 


11 


VECTOR 


(LINE 


11 


VECTOR 


(LINE 


13 


VECTOR 


(LINE 


14 


VECTOR 


(LINE 


13 


VECTOR 


(LINE 


16 


VECTOR 


(LINE 


17 


VECTOR 


(LINE 


20 


VECTOR 


(LINE 


21 


VECTOR 


(LINE 


22 


VECTOR 


(LINE 


ai 


VECTOR 


(LINE 


24 


VECTOR 


(LINE 


25 


VECTOR 


(LINE 


U 


VECTOR 


(LINE 


2T 


VECTOR 


(LINE 


30 


VECTOR 


(LINE 


31 


VECTOR 


(LINE 


32 


VECTOR 


(LINE 


33 


VECTOR 


(LINE 


34 


VECTOR 


(LINE 


33 


VECTOR 


(LINE 


36 


VECTOR 
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1867 
868 
869 
870 
8?1 
872 
873 
874 
875 
876 
877 
878 
879 
880 
881 
882 
883 
884 
885 
886 
887 
888 
889 
890 
891 
892 
893 
894 
895 
896 
897 
898 
899 
900 
901 
902 
903 
904 
905 
906 
90? 
908 
909 
910 
911 
912 
913 
914 
913 
916 
917 
918 
919 
920 



010530 



010626 



000000 
00E000 



000000 

000000 



012012 

012020 

012026 

012034 

012042 

012050 

012056 

012064 

012072 

012100 

012106 

012114 

012122 

012130 

012136 ' 

012144 

012146 

01215a 



042043 
020105 
0^7111 
052123 
044501 
030455 
046104 
046445 
020106 
042503 
051505 
046043 
042040 
020040 
040522 



020040 
020040 



030314 
047117 
020105 
036440 
042116 
026461 
026302 
030101 
042304 
020111 
047103 
047111 
040433 
020040 
020120 

020040 
020040 



026461 
046040 
042524 
046440 
041305 
055104 
022502 
047440 
044326 
SJ3U20 
022324 
020105 
031104 
052040 
032101 

020040 



RRCV 
NsN*l0 
AaA*l 
«ENDR 

N30 

A«0 

RBUFl 8 REPT 
RBUPP 
NsN+18 
AsA*l 
a ENDR 
Na0 
At® 

TC8R1 8 REPT 
TKMT 
NaN*l§ 
ASA*1 
*ENDR 
Ns0 
A®0 

TBUFI „REPT 
TBUPF 
N8N410 
AsA*l 
a SNOR 
Na0 
a REPT 
131 
NsN*t 
9 ENDR 
Nu® 
8 REP? 
23ft? 
NsNH 
9 gNDR 

(MESSAGES 

MTITLEI .ascxx 



\Nt\A 



IK 
\N.\A 



31, 
\N,\A 



31, 
NN,\A 



SI. 



38, 



# XDLii«I ON LINE TEST ■• MAXN0ge«li«D2DLB*Sl 9 



9 A9CII s %WhP OP DEVICES PRESENTS^ 



•ascii num d^adr trap am* 



MLXNEl .ASCII 9 
MDADRt .ASCII * 
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) 



J92I 
1922 
1923 

1925 

1926 

192? 
1928 
1929 
1930 
iWi 
1932 
1933 
1934 
1935 
1936 
193? 
1938 
1939 
1940 
1941 
1942 
1943 
194a 
1945 
194fe 
1947 
1948 
194"? 
1950 
1951 
195g 
1953 
1954 
1955 
1956 
1957 
1958 
1959 
i960 
1961 
196g 
1963 

196a 

1965 
1966 
1967 
1968 
1969 
1970 
1971 
1972 
1973 
197a 



0121*6 
0i?l?4 
01?1?6 
015204 
012215 
012213 
012220 
012226 
012234 
012242 
012247 
012254 
012262 
012270 
012276 
012277 
012304 
012312 
012314 
012322 
012324 
012332 
012340 
012346 
012354 
012357 
012364 
012366 
01237a 
012402 
01240? 
012414 
012422 
012427 
012434 
012442 
012445 
012452 
012457 
012464 
012466 
012474 
012500 
012506 
012507 
01251a 
012522 
012530 
012536 
0125aa 
012552 
012553 
012560 



020040 

020040 
010345 

047045 

0«750fe 

100 

045 

044«40 

0*1351? 

052516 

020040 

045 

020122 

054105 

042105 

120 

045 

042520 

020040 

020040 

020040 

052045 

042105 

020115 

020040 

020040 

040 

0400*10 

043045 

044440 

041522 

045 

020105 

046530 

045 

020040 

020040 

040 

051123 

040 

040040 

020040 

020122 

020R40 

100 

045 

020060 

043516 

PS40510 

042516 

020105 

100 

045 

020061 



020040 
R20040 

047117 
047125 

05452a 
020116 
040522 
$41115 
020040 
051105 
020055 
042520 
031040 

05H24 
020104 



040522 
043040 
041520 
020040 
100 
010040 

046101 
051116 
031126 
040506 
0147111 
052111 
041520 
020040 
108 
052040 
036440 
020040 

054122 
020075 
020040 

050045 
020055 
042514 
020122 
046440 
042524 

050045 
320055 



020105 
022504 

042520 
051120 
020115 
051105 
100 
047522 
047125 
052103 
040522 

050101 
047524 



050120 
§47522 
020040 
020040 

020040 

042523 
020056 

10® 
051514 
020124 

100 
020075 
020040 

041530 

040 

020040 

051503 

02004S 

043322 
044523 
041440 
044514 
042117 
052123 

043522 

050123 



MTRAPi 

MNONEJ 



.ASCII 
.ASCII 



%P' 



MSWSEU .ASCII 'XTYPE IN PROGRAM NUMBER #' 



MTERR? 



.ASCII 'XERHOR • UNEXPECTED TRAP* 



■ ASCII STRAPPED TO * 



020040 020040 MTOl 



MFROMl 

CSRAODI 

RINTMI 



.ascxi 

.ASCII 

a Ascn 

•ASCII 
.ASCII 



TINTMS .ASCII 



EM01 
APC8 

ATHCSRi 

AT8WAS? 

ARKCSR1 

ARXWAS1 

P0TIT1 



.ASCII 

.Aseix 

.ASCII 
•ASCII 

9 ascii 

•ASCI! 

»ASCII 



•XTRAPPED PROM PC ' 

9 XPALSE INT, RCVRi* 
"SSFALSE INT KMITP^ 

*gPCH * 

4 TKCSR ■ * 

• $o 

* R«C8P a • 

9 S5SPRS8 • SINSLE CHAi LINE MODE TI8T0' 



P1TITI .ASCII 9 %%PnUl * SPEC SIN COUNT UNE MODE TE8TP* 
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1975 
1976 
197? 
1978 
1979 
1980 
1981 
1982 
1983 
1984 
1985 
19S6 
198? 
19B8 
1989 
1990 
1991 
1992 
1993 
1994 
1995 
1996 
199? 
1998 
1999 
2000 
2001 
2002 
2003 
2004 
2005 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2013 
2014 
20,15 
2016 
2017 
2018 
2019 
2020 
2021 
2022 
2023 
2024 
2025 
2026 
202? 
2028 



2566 
2574 
2602 
2610 
2616 
2622 
2630 
2636 
2644 
2652 
2660 
2666 
2672 
2700 
2706 
2714 
2722 
2730 
2736 
27tt4 
2752 
2760 
2766 
2774 
2777 
3004 
3012 
3020 
3026 
3034 
3042 
3050 
3055 
30.62 
3070 
3076 



104 
112 
114 
122 
130 
136 
143 
150 
156 



3164 
3172 

sato 

3306 
1214 
322£ 

3230 
3232 

3240 



0ai505 
041440 
046040 
047515 
051505 
022445 
026440 
044503 
051505 
046040 
047515 
0515R5 
022445 
026440 
044505 
051505 
052040 
022445 
02644® 
0<J4503 
051505 
052040 
051450 
02^514 

045 
026440 
020101 
052000 
051525 
040515 
020104 
044514 

045 
044440 
040522 
051522 
047506 
035123 
041045 
020060 
05H81 
052107 

045 
052040 
044103 
042117 
041040 
044502 
020106 
052103 
052131 
040040 
044445 
046101 



041040 
052517 
047111 
042504 
040124 
051120 
051440 
046101 
040523 
047111 
042504 
040124 
051120 
051040 
042526 
040523 
051503 
051120 
051440 
046181 
040523 
©31505 
044320 
100 
051120 
042040 
041505 
051505 
047111 
047131 
040506 
054324 
054524 
020116 
042515 
840440 
046114 

032111 
020075 
046030 
022310 
054324 
051505 
051101 
020105 
058111 
030124 
047101 
046101 
020103 

046114 
041040 



047111 
032116 
020105 
©52040 

031107 PSTITI 

042520 

046440 

042507 

020105 

052040 

031507 P3TIT1 

041303 

046440 

042507 

040124 

032107 PflTlTi 

042520 

046440 

04S507 

080124 

040322 

032507 PSTITI 
032101 
047510 
020124 
020107 
031101 
044503 
100 
042320 3ELPAR! 
040320 
042524 
020123 
03331? 

016461 
044103 
047J0S 
100 
041520 3ELCAR1 
020134 
041440 
047111 
036467 
047440 
047440 
041040 
020040 

043303 OTEftRl 

031101 



.ASCII 9 SIPft@8 * SPECIAL MiSSASE LINE MODE TEST®' 



.ASCII f %XMB3 ■• RECEIVE MS8SASE TESTS* 



.Ascii § x%pnin • special messase tist (spiral)? 1 



• ASCII 9 8PR83 * DATA ECHO TSS? U8SNS HAVHARD PACILITTP* 



•ASCII *HTYPg IN PARAMETERS AS FOLLOWS!* 



.ASCII **im«B 8 CHAR i.ENQJN«V 



.ASCII •XTYPI TEST CHAR CODE IN B1T7-BXTB OP AN OCTAL BYTE Z* 



.ASCII "1ILLISAL DATA!*' 



D2DLB8 MACYli ??Cfe5?3 



t7»Nnv»^^ ifi?§0 P&GE «? 



2029 

2030 
5031 
5632 
3033 
303A 
3035 
2036 
£037 
2038 
2039 
£040 
2041 
20«2 
20«3 
2044 
2045 
2046 
2047 
2048 
2049 
2050 
2051 
2052 
2053 
2054 
2055 
205b 
2057 
2058 
2059 
2060 
2061 
2062 
2063 

206a 

2065 

2066 
2067 
2066 
2069 

20 7 
2071 
2072 
20?3 

2P"a 

2075 
2076 
2077 

2078 
2079 
2080 
2081 
2083 



013246 
013251 
013256 
011264 
013272 
013300 
013306 
013313 
013330 
013335 
013332 
013340 
0133«3 
013350 
013351 
013352 
013355 
013362 
013370 
013373 
013377 
013404 
013412 
013420 
013426 
013427 
013434 
013442 
013450 
013456 
013464 
013472 
013477 

013504 
013506 
013514 
013522 
013530 
013536 
013544 
013552 
013560 
013566 
013570 
013576 
013604 
013605 
*11612 
013620 
013623 
013630 
013636 
013644 



?>?35Pi 

045 

4 6 4 

04*503 

aa45?4 

pa?0(U0 

0g?5?3 

040 

$40537 

040 

044103 

027117 

040 

007 

100 

037445 

045 

042515 

036440 

040 

040 

020122 

047105 

020124 

100 

045 

(341440 

052103 

040515 

041445 

052507 

047117 

040 

013504 

015 

044124 

041511 

053517 

1*20130 

042105 

0120122 

040514 

043517 

045503 

030040 

033065 

045 

045 

043040 

022504 

045 

052522 

0«05?2 

05111? 



100 

0aP515 

047111 

047117 
053101 
035102 
020040 
035123 
020040 
051 101 
040 
020040 



040520 
045324 
040 
020010 
046103 
047524 
020104 
042521 

044514 
047117 
047511 
042504 
047117 
040523 
021440 
020040 

012 
020105 
020113 
020116 
052512 
047440 
044124 
054532 
020123 

031061 
034067 

044514 
044501 
100 
053117 
026116 
042515 
050040 



0412513 

020105 
0^1505 
040056 
020101 

040 
030080 

0ti0 
020040 
047040 

040040 



040532 

05152? 



040505 
031440 
047516 
027124 

042516 
043516 
030116 
840056 
044506 
044524 
040 
100 



053521 
051103 
047506 
050115 
042526 
020105 
043040 
040502 

§33063 
027071 

042516 
042514 

051105 
043040 
020054 
051101 



MAKCONS .ASCII 'XMAKE LINE CONNECTION ,, f> ' 



CERD&T1 S ASCII 
P.8B! .ASCII 
CWA35 .ASCII 



CRNUMJ .ASCII 
ENDPAS! .BYTE 

8 Ascn 

AINPRQI „A3C?I 
PARMTSI 9 ASC1X 



APARH! „A8Cn 
LINCHMi .ASCII 



' DATA 8/8! * 

9 MASS * 

' CHAR N0 9 * 



007 
»$* 

*%PARAMgTgHS ■ * 



9 #» 

* CLEAR TO SEND NOT 8ET 9 # 9 



UINMADI .ASCI! mim CONNECTION MAOS 9 P 9 



ACON?l§! 



TCONFIS1 

9 EVEN 
PRSgMi B BVTE 

.ASCII 



e ASCII '^CONFIGURATION # * 



.ASCII * P 8 



•ASCII 

LFAXLi 9 A8CII 

rover! .Aseix 



1313,012 

a THE QUICK BROWN ?Q* JUMPID OVER THE LAIY 0088 BACK* 



9 I123ast789.l' 

•ILXNI'FAILED*** 

"^OVERRUN, FRAME, OR PARITV tftRORg#« 



OZDLBB HACYH 27C6573 
D20LBB B S«C 



t7«N0Ve>75 14ii0 PASf 43 



2083 
2084 
2085 
2086 
2087 
2088 
2089 
2090 
2091 
2092 
2093 
2094 
2095 
2096 
2097 
2098 
2099 
2100 



01 
02 
03 
04 
05 
06 
07 
28 
09 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
1.23 

2a 

25 
26 

27 
S3 
29 
30 
31 
32 
33 
34 
35 
36 



013652 
013660 
013665 
013672 
013675 
013702 
013710 
013715 
013722 
013725 
013732 
013740 
013742 
013750 
013756 
013764 
013772 
014000 
014006 
014014 
014022 
014026 
014034 
014042 
014050 
014056 
014064 
014065 
014072 
014100 
014106 
014114 
014122 
014130 
014116 
014144 
014152 
014160 
014162 
014170 
014176 
014204 
314212 
014215 
014222 
014230 
014236 
014344 
014252 
014256 
014264 
014272 
01430i 
014306 



053H1 

047532 

045 
021440 

040 
020123 
052103 

045 
021440 

040 
020123 
0«2i05 
052045 
047H1 
0A6101 
043116 
052101 
047H1 
026460 
047515 
054534 
044445 
031124 
030475 
036461 
020040 

100 

045 
044440 
040534 
041040 
020064 
044514 
054440 
042532 
044514 
047522 
040040 
054445 
046101 
051106 
04?U1 
020040 

045 
020133 
041040 
020116 
052101 
047117 
053045 
044514 
027117 
041317 
047|li 



020131 
032522 
0d4514 

040 
020010 
042523 
042105 
044514 

040 
030040 
040503 

050131 
047440 
020072 
043511 
047511 
041040 
020061 
042504 
042520 
020116 
020040 
031460 
030063 
020040 

054534 
030116 
020114 
053111 
044134 
043516 
053517 
041440 
043516 
020115 

05251? 
042314 
046517 
020105 

%m 

051120 
040504 
052125 
047117 
030181 
040105 
050131 
042516 
044440 
043534 
041040 



051105 
100 
042516 AUNEKi 

040527 TUNOi 
043514 
10® 
042516 ALINEI 

04052? TUNE! 
046114 

020105 
033103 
047503 
051125 
010116 
052111 
030046 
020115 

044503 
030050 
820054 
024462 



042330 
041517 
047111 

026460 
030105 
031440 
§40440 
046101 
043040 



,Ascn 

.ASCII 

•ASCII 
,A8CII 



9 ILlNg $ * 

8 WAS SELECTED!^ 

9 IUNE • * 

$ WAS GALLIC 



•A8CXZ *S?YPI IN OCTAL! CONFIGURATION |N BXTB-l I MOOEH TYPE* 



*£8cn 'xxn bits eeiiii, isiiai § s 



8 A@CII *|T¥PE IN OCTAL IN BITIs.4 THE LINE # YOU ARE CALLXNB PROM $* 



041440 
010104 
046040 
010043 

051505 
040524 
047524 
043040 
044120 

020105 
047040 
02S 116 
020114 
858111 



.ASCII *i¥OU CALLED PBQH LINE # * 



URAt 
BUTTON! 



.ASCII 
.ASCII 



9 f8PRES8 DATA BUTTON ON DATA PH0NE@* 



LOLINIS 8 ASen # !?YPE LINE N0 9 IN OCTAL IN BIT 3*7 #' 



DZOtBB MACVSl 27(fe5?1 !7-NDV-7S 
0Z0LBB.3RC 



14i5c* parr aa 



"> 



2137 
2138 
£139 

21*0 

21*1 
21*2 
21«3 

21*4 
aias 

21*6 

2147 
2148 

21*9 

2150 
2151 
2152 
2153 
215<J 
2155 
2156 
2157 
2156 
2159 
2160 
2161 
2162 
2163 
2164 
2165 
2166 
2167 
2168 
2169 
2170 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2178 
2179 
2180 
2181 
2182 
2183 
2184 
2185 
2186 
2187 
2188 
2189 
21^0 



01*31* 

01*132? 
014325 
01*332 
01*3*0 
01*3*6 
01*1354 
01*3b2 
014363 
(21*370 
01*376 
01**04 
01*405 
014412 
01*420 
014426 
01*43* 
014435 
014442 
01**50 
01*456 
01446* 
014472 
014500 
01*506 
01*514 
01*522 
01*530 
01*535 
01*542 
01*550 
01*553 
01*560 
01*566 
01*57* 
01*602 
01*610 
01*616 
01*621 
01*626 
01*63* 
01*6*2 
01*650 
014656 
01*663 
01*670 
01*676 
01*704 

01*710 



"31*40 
0200*0 

0*5 
042536 
051106 
&53517 
044501 

100 

0*5 
0*0507 
0*2516 

1010 

0*5 
0*0507 
0**526 
0*2104 

100 

0*5 
0***40 
040524 
04*502 
020065 
04*51* 
0*6525 
0*3117 
0*15tl 
051 10* 
047524 

0*0 
04*506 
020040 

045 
044*4)0 
020137 
020122 
042503 
042522 
020040 

045 
04*440 
033467 
0*7524 
0*3516 
052117 

0*0 
0*2503 
0*2522 
020040 
01*710 
000000 
016660 

000000 

020610 
01505* 



033*55 
100 
0*2522 
0*2522 
046517 
051105 
05251* 



05*52* 
020116 
020114 
02012* 
04*12* 
042516 
042502 
042040 
020105 
051505 
041040 
0*7515 
042105 

100 
054524 
020116 
05*122 
042504 
0404*0 
051523 

100 
015*52* 
020116 
03346? 
041*40 
020105 
042510 
042504 
040*40 
051523 

100 



020H*P 

047503 
020104 
0500*0 
0*30*0 
0*2522 



046111 0*251* 

02011* 04*514 

0*70*0 027117 

046111 04251* 

020114 042504 

042503 0*0440 

042522 051523 



042520 
041517 
020072 
026460 
020105 
047040 
020122 
053105 
042101 
020123 
105 
044504 
020040 

042520 
042516 
051503 
04*526 
042104 
020040 

042520 
033461 



040510 
0*7101 
122 
044526 
042104 
020040 



MPWRFS .ASCII 'XRECOVEREn PROM POWER FAILURES' 



.ASCII "XILLEGAL LINE NO.#* 



MMODDI .ASCII 'XILLEGAL DEVICE ADDRESS*' 



MMODll a A3C!I 'XTYPE IN OCTAL I BIT S-5 THE LINE NUMBER OF DEVICE ADDRESS TO BE* 



MODIFIED 



MM0D2! .ASCII 'XTYPE IN NEW RXC3R DEVICE ADDRESS 



MMOnSl ..ASCII 'XTYPE IN 177777 TO CHANGE ANOTHER' 



.ASCII 



DEVICE ADDRESS 



.EVEN 
OUTBUFJ OPEN 

,BOUTBUP*1000 e 
INBUFI OPEN 

.SINBUF+100B, 

BUFFaOUTBUF*100 9 



OZDL8B MACYU 2?Cfc57) !7*N0V»75 i-:50 PAGE *3 
DZDLBB.SRC 



21 9 I 020630 



OENDI .END 



DZDL.BB 


MACVli ?7(b$7) 


\ 7»NriV« 


75 ia:50 


PAGE ah 








ozdlbb* 


S»C Ivvrhl 


T 4HI £ 












A « 


000337 


ACCiNFI 


PM3456 


Aoni 


004004 


A0TENP 


004362 


AGAIN 


003746 


AJNPPG 


0133^2 


ALTNF 


013715 


ALINEX 


013665 


APARM 


313373 


APC 


01241a 


ARXCSR 


012466 


ARXWAS 


012500 


ATXCSR 


assays 


ATXWAS 


012457 


BDCNV 


004216 


BDCNVA 


004250 


8DCNV0 


004302 


RDCNVC 


004304 


BOHNVO 


004306 


RIT0 a 


000001 


BITi 8 


00000? 


BITlfl s 


002000 


BITS1 ■ 


004000 


BITI? 8 


010000 


BITi3 ■ 


320000 


RIT14 s 


4 000 


BITH • 


100000 


BIT2 s 


000004 


BIT3 ■ 


003010 


BH4 s 


000020 


BITS ■ 


000040 


BIT6 a 


000100 


BIT? a 


000200 


BIT8 c 


000400 


BIT9 a 


001000 


BMOVA 


004204 


BMOVE 


034174 


RUFF a 


01505a 


BUFFP 


001400 


BUTTON 


014215 


CALLED 


001404 


WALLER 


001402 


CARMSK 


001362 


CEROAT 


013300 


CHALT ■ 


104005 


THLT 


002366 


CNVCTR 


004354 


COLMN 


007652 


CONFIG 


001312 


CONN 


006250 


COUNT 


001324 


CRNUM 


013343 


CRXTX 


002752 


CRXTXA 


003024 


CRXTX6 


003026 


CRXTXC 


003032 


CSB 


013313 


f.SRADD 


012357 


CTRD 


001364 


CWA8 


013325 


DATCH K s 


104004 


nCERR 


005512 


DECVAL 


004374 


DELAY a 


104016 


DEND 


020630 


DIGIT 


004356 


niSCON 


006234 


DLCNT 


003526 


DLY 


003*166 


DLYA 


003504 


OLYB 


003510 


OLYC 


003522 


OOIT 


003742 


DONE 


003776 


DTCHK 


002412 


DTCHKA 


002510 


OTERR 


0132 32 


FCDAT 


003346 


EHALT a 


104010 


EHLT 


002400 


EHLTA 


002410 


FIGHT 


003632 


EMTA 


002234 


EMTINT 


002222 


EMTTAB 


001264 


FM0 


012427 


ENOPAS 


013350 


ERR 


002512 


ERRA 


002562 


FRRB 


002624 


ERRC 


002632 


ERRCNT 


010W4 


ERRD 


002642 


FRRE 


002644 


ERROR a 


104003 


ERRORS 


104013 


ERRRX a 


104015 


FRRT5C a 


104014 


ERR1 


002534 


ERR3A 


007230 


ERR3B 


007244 


FRR3C 


007252 


ERTP 


004520 


ERTPA 


004370 


FILL 


004146 


FILLA 


004154 


FINISH 


003476 


FIVE 


003720 


FMAP 


001350 


FNONE 


001346 


FORMAO 


004704 


FROMPC 


001342 


FTITLE 


001344 


GENPAR 


003600 


INBUF 


016660 


INBUFP 


001376 


INCPRG 


002354 


INDAT 


003322 


INFIL 


004142 


LDLJNE 


014236 


LDPRI 


010274 


LOPRIA 


010310 


LDPRIK 


010324 


LDTVEC 


010236 


LDTVED 


010246 


I.DVECB 


010202 


LOVECS 


010162 


LDVECi 


010314 


L0VEC2 


010262 


LFAIL 


013605 


LINCA 


004760 


LINCB 


004776 


LINCF 


005056 


l.INCHM 


013377 


LINCON 


004742 


LINE 


001330 


LINENO 


001354 


LINEUP 


005074 


LINMAO 


013427 


LIN3A 


004056 


LINSEL 


004014 


MACHER 


000004 


MAKCON 


013251 


MANUALS 


100000 


MAPA 


001520 


MAPEND 


001730 


MAPgRR 


001752 


MAPNE 


001550 


MAPOK 


001560 


MAPOKA 


001672 


MAPVEC 


004626 


MOAOR 


013154 


MFROM 


012346 


MLINE 


012146 


MMODD 


014405 


MMODX 


014363 


MMOD1 


014435 


MM0D2 


014553 


HMQ03 


014621 


MNONE 


012176 


MODEM 


001412 


MOOEV 


002024 


M0DEV1 


002036 


MQDEV2 


002072 


M0DEV3 


002116 


MOVIT 


010116 


MOVITA 


010136 


MPWRF 


014325 


mswsel 


012213 


MTERR 


012247 


MTITLE 


012012 


MTO 


012314 


MTRAP 


012166 


Kl a 


000040 


NUMBER 


001334 


OACNV 


003530 


OACNVA 


003542 


0LDP9 


001336 


OPEN a 


000000 


OTBUFP 


001406 


OUTBUF 


014710 


nvRLAY 


005076 


OVRLYA 


005106 


PARBIT 


001322 


PARE* 


00447h 


PARMTS 


013355 


PC a 


8000007 


PFAIL 


002646 


PQPSP s 


005726 


P0PSP2a 


022626 


PRGID 


001342 


PRSNUM 


001340 


PRGTAB 


001244 


PRG0 


006424 


PRG0A 


006534 


PRGt 


006340 


PRGIC 


006636 


PRG2 


006642 


PRG2A 


006664 


PRG3B 


006670 


PRGSC 


006674 


PRG2M 


013504 


PROS 


006740 


PRG3A 


006754 


PRG3EX 


007462 


PR64 


007474 


PRG4A 


007530 


PRG4B 


007340 


PRGaC 


00754? 


PRG4D 


007560 


PRG5 


007706 


PRG3A 


007732 


PRG5AA 


007754 


PRG5B 


007762 


PRG5BB 


007772 


PRGSC 


007776 


DZOLBB 


MACY11 ?7(65?) 


17«NfW«' 


75 lfllSe 
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PRG5D 


010076 


PRG5E 


010106 


PRTY0 a 


> 000000 


PRTY1 a 


i 000040 


PRTY? s 


000100 


PRTY3 ■ 


i 000140 


PRTY4 fl 


i 000300 


PRTY3 a 


• 000340 


PRTY6 ■ 


0550300 


PRTY7 a 


000340 


P3W ■ 


177776 


PWRUP 


003656 


P0TIT 


012507 


P1TIT 


012553 


P2TIT 


013633 


P3TIT 


013672 


P4TIT 


012730 


P5TIT 


012777 


RiUF 


010530 


RCSR 


010432 


RDDAT 


003330 


RDOCT 


003314 


RECDAT 


001336 


REMAP 


001416 


RESTRT 


002676 


RETRN 


003452 


RINTM 


013366 


RINT3 


007056 


RINT3A 


007140 


RINT3B 


007172 


RINT3E 


007360 


RISR 


005134 


RISRA 


005164 


RISRAA 


005206 


RISRB 


005333 


RISRBB 


005300 


RISRC 


005310 


RISRCA 


005344 


RI3RD 


003376 


RISRDA 


003416 


RISREX 


005b20 


RISRF 


005546 


RISRPB 


005734 


RISRFC 


006000 


RISRFD 


006110 


RISRFE 


006152 


RI8RFF 


006134 


RXSRFG 


006164 


risrfh 


006202 


RISR0 


011022 


RXSR1 


011033 


RI3R10 


011123 


RISR11 


011132 


R I SRI 2 


011142 


RISR13 


011133 


RISR14 


011163 


RISR15 


01U72 


RISR16 


011202 


RISR17 


011313 


RX3R3 


011043 


RI3R20 


011222 


RISR21 


011232 


RISR22 


011343 


RI8RS3 


011333 


RiSR?a 


011262 


RISR25 


011272 


RI3R36 


011303 


3I8R37 


011313 


RISR3 


011052 


RI3R30 


011322 


RI3R31 


011333 


RISR33 


011343 


RISR33 


011352 


RI3R14 


011362 


RI3R35 


011373 


RISR36 


011403 


RISR4 


011062 


PISR5 


011072 


RISR6 


011103 


RI3R7 


011113 


ROVER 


013623 


RREAD 


003442 


R3TPC 


003350 


RSTP8W 


003333 


RSTREGs 


104012 


RSTRG 


002314 


RTN 


003753 


R^BUF 


001303 


RXBUFT 


007472 


RXC3R 


001200 


RXC3RT 


001370 


RKERR 


003733 


RXLVL 


001212 


RXVTR 


001210 


R0 S3 


£000000 


Rl 9 


£000001 


R2 s 


X000002 


R3 a 


X000003 


R4 • 


3000004 


R5 a 


£000005 


SAVE 


001326 


SAVREGb 


104011 


3AVRB 


003254 


SAVR0 


003312 


SELCAR 


013143 


SELPAR 


013055 


3ETPAR 


004403 


SEVEN 


003676 


SIX 


003654 


SOFTSR 


000176 


3P ■ 


£000006 


SRPTR 


000174 


SRT 


001374 


STAD 


000300 


STALL ■ 


104003 


START 


001433 


STARTi 


001770 


9TP.0NT 


000236 


STKPTRa 


001300 


STPARA 


004300 


STPPA 


003110 


3TPRA 


003060 


STRVRV 


003043 


8TRXV s 


104006 


8TTXV s 


104007 


STXMTV 


003072 


3UBTEN 


004314 


3U8TWA 


004330 


SUBTNB 


004334 


9VRPC 


003310 


3VRP3W 


003312 


TBIT1 


004434 


TBUF 


010724 


TBUFFP 


001410 


TCONFI 


01S477 


TCRLF 


007654 


TCSR 


010626 


TEMP 


001372 


TEMPI 


001333 


TENPWR 


004360 


TFLAG 


007466 


TINTM 


012407 


TINTS 


007370 


TINT3B 


007340 


TINT3C 


007402 


TISR 


006260 


TISRA 


006376 


TISRAA 


006374 


TISRB 


006404 


TISRBB 


006374 


TISRC 


006344 


TJ8R0 


011413 


TISR1 


011433 


TISR10 


011513 


TISR11 


011533 


TISR13 


011333 


TISR13 


011542 


TISR14 


011552 


TJSR13 


011562 


TI3R16 


011373 


TISR.1T 


011602 


TISR2 


011412 


TURg® 


011613 


TISR31 


011623 


* T 3R22 


011632 


TI3R23 


011643 


TI8R34 


011633 


TISR33 


011663 


, 3R26 


011672 


TISR27 


011702 


TISR? 


011443 


TISR30 


011718 


? I3R3i 


011722 


TI3R32 


011732 


TISR33 


011742 


TISR34 


011733 


TI3R35 


011762 


TISR36 


011772 


TI8R37 


013003 


TISR4 


011453 


TSSR5 


011462 


TISR6 


011472 


TISR7 


011503 


TKB 


001333 


TKLVL 


001212 


TK8 


001220 


TKVTR 


001230 


TLINE 


013735 


TLlNEx 


0136 75 


TQPC 


001340 


TPB 


001336 


TPINT 


007433 


TPINTA 


007442 


TPLVL 


001236 


TPS 


001234 


TPVTR 


001334 


TXBUF 


001206 


TXCSR 


001204 


TXCSRT 


001366 


TXERR 


003710 


Y8LVL 


001216 


TXVTR 


001214 


TYP 


003133 


TYPA 


003136 


TYPC 


003160 


TYPD 


001176 


TYPDAT 


003342 


TYPE a 


104000 


TYPES ■ 


104001 


TYPF 


003214 


TYP3 


003344 


TYP3A 


003300 


TYPSAA 


003250 


TYP3© 


003306 


UR 


$14163 


URA 


014313 



DZOLBB MACYU ?7(65?J 17«NQV»75 Ut50 PARE ttfi 
0ZDLB8.SRC SYMBOL TABLE 



VECTAB 01033^ 

■ 02P630 



VMTDAT 0101360 



) 



ERRORS HETECTEn: 

*DZOLBB. DZOLBB aDZOLBB. SRC/SOL 
RUN-TIME! 10 17 SECONHS 
CORE USEDS 10K 



